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HISTORY 
NO CHANGES TO THE 11/34 FLOATING POINT DIAGNOSTIC PART ‘A* WERE 
FOUND TO BE NEEDED TO ADAPT IT FOR USE ON THE 11/44. 


THE FOLLOWING WAS ADDED TO THF 11/34 FLOATING POINT DIAGNOSTIC 
TO MAKE THE PART °B' COVER THE 11/44: 


1. TEST 22 = PROCESSOR LOOKS TO SEE iF APT IS CON- 
TROLLING THE TEST, AND IF IT IS, CHECKS TO SEE 
IF THE USER HAS SELECTED THIS TEST BY CHECKING 
BIT 7 IN THE SWITCH REGISTER. IT HAS ALSO BEEN 
CHANGED SO THAT IF BIT 7 IS *ONE*, THE CODE WILL 
SELECT THE TEST. 


THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
TO MAKE THE PART 'C' COVER THE 11/44: 


1. TEST 76 = CHECKS THAT FP PROCESSOR DOESN'T ACCESS 
D=SPACE UNTIL CONDITIONS WARRANT. 


2. TESTS 77 THROUGH 106 - CHECK THAT SR1_ MATCHES 
WHAT ACTUALLY HAPPENED TO THE REGISTER OF THE 
INSTRUCTION, AND THAT THE VALUE OF AUTO INCREMENT 
/DECREMENT WAS PROPER. 


ALL THREE PARTS WERE RE-RELEASED WITH A NEW SYSMAC THAT CHECKS 

BIT 0 OF THE CPU ERROR REGISTER (POWER MONITOR BIT). THE ADDITIONS 
WERE MADE IN THE SCOPE ROUTINE, EXECUTED AT THE BEGINNING OF 

EACH TEST. IF THE BIT BECOMES SET, AN ERROR _IS CALLED FROM THE 
SCOPE ROUTINE. THE BIT 'S CLEARED, AND THE TEST IS CONTINUED, 

IF THE BIT BECOMES SET IN THE MIDDLE OF 4 TEST, AND AN ERROR OCCURS 
FOR ANY REASON, THE ERROR ROUTINE WILL CALL *TWO* ERRORS, THE POWER 
MON] TUR BIT ERROR FIRST, THEN THE ERROR ORIGINALLY CALLED. __IN 
ADDITION, THE $READ ROUTINE NOW CHECKS FOR A RANDOMLY INPUTED “Q 
BEFORE A “S IS TYPED. THIS BECAME NECESSARY WITH CERTAIN DATA 
CONNECTIONS OF SOME SYSTEMS. 
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ABSTRACT 


THE THREE PROGRAMS: 
CKFPACO CKFPBBO CKFPCCO 


ARE DESIGN TO DETECT AND REPORT LOGIC FAULTS IN THE 
PDP 11/44 FP11=-F FLOATING POINT PROCESSOR. THE 
DESIGN IS AN ATTEMPT TO RFACH ALL ROM STATES, TAKE 
ALL BRANCH MICRO TESTS (BUT'S) AND VERIFY ALL THE 
LOGIC. THEY CONSIST OF 157 (OCT) INDIVIDUAL TESTS 
SEQUENCED TO DETECT AND ATTEMPT TO IDENTIFY FAULTS 
WITH A MINIMUM HARDWARE OR SOFTWARE LEVEL. THE 
TESTS ARE PARTIONED INTO THREE STAND-ALONE PROGRAMS 
DESCRIBED BELOW. 


NOTE THAT ERROR REPORTS IN THESE PROGRAMS ARE BASED 
UPON THE KNOWLEDGE THAT ALL PREVIOUS TESTS HAVE BEEN 
RUN AND IN MOST CASE THAT THERE IS ONLY A_ SINGLE 
POINT FAULT IN THE FP11-F. IF THE PROGRAMS OR TESTS 
> ges: IN ORDER THEN ERROR MESSAGES MAY NOT BE 


A. CKFPACO 

CKFPACO TESTS: 
LDFPS 
STFPS 


CFCC 

sey" SETD, SETI AND SETL 

LDF AND LDD (ALL SOURCE MODES) 

STD (MODE 0 AND 1) 

ADDF, ADDD AND SUBD (MOST CONDITIONS) 
B. CKF PBBO 
CKFPBBO TESTS: 


ADDF, ADDD AND SUBD (ALL CONDITIONS NOT 
TESTED IN CKFPACO) 
CMPD AND CMPF 


DIVD AND DIVF 


MULD AND MULF 
MODD AND MODF 
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C. CKFPCCO 
CKFPCCO TESTS: 


STF AND STD (ALL MODES) 

STCFD AND _ STCDF 

CLRD AND CLRF 

NEGF AND NEGD 

ABSF AND ABSD 

TSTF AND TSTD 

NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
LDFPS (ALL SOURCE MODES) 

LDIF AND LDCLF 

LDCID AND LDCLD 


STFPS (ALL DESTINATION MODES) 
STCFL AND STCFI 
STCDL AND STCDI 


EQUIPMENT 


A PDP 11/44 (WITH OR WITHOUT CONSOLE), LA30 (OR 
EQUIVALENT) AND AN FP11-F FLOATING POINT PROCESSOR. 
NOTE THAT A SPECIAL INTERRUPTS TES? MODULE IS_ BEING 
DESIGNED FOR USE IN THE MANUFACTURING ENVIRONMENT. 
WHEN THIS DEVICE IS PRESENT THE PROGRAM CKFPBBO WILL 
MAKE USE OF IT TO TEST THE FPP INTERRUPT ON BUS 
REQUEST FUNCTIONS. 


STORAGE 


ALL THREE PROGRAM REQUIRE A MEMORY SYSTEM OF AT 
LEAST 16K TO LOAD AND RUN. 


PRELIMINARY PROGRAMS 


THESE THREE DIAGNOSTICS WILL ASSUME THAT THE PDP 
11/44 CENTRAL PROCESSOR IS FAULTLESS, THEREFORE WHEN 
IN DOUBT RUN THE PDP 11/44 PROCESSOR DIAGNOSTICS 
BEFORE THESE FP11-F DIAGNOSTICS. 


LOADING PROCEDURE 


THE PROGRAMS WILL BE SUPPLIED ON THE 11/44 
DIAGNOSTIC MEDIA. REFER TO THE XXDP OPERATING 
MANUAL FOR FURTHER INFORMATION. 


SEQUENCE 
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231 4. STARTING PROCEDURE 

a ee oS ce ee ee ee meee ee, ng) | Sine 

233 

Sie 4.1 CONTROL SWITCH SETTINGS 

$39 SEE SECTION 5.1 

* $i 4.2 PROGRAM AND OPERATOR ACTION 

240 1. LOAD PROGRAM INTO MEMORY 

241 2. LOAD ADDRESS 200 

242 , = SET CONSOLE SWITCHES (IF CONSOLE IS PRESENT) 

243 4. PRESS START 

2464 ON FIRST PASS THE PROGRAM 

245 WILL IDENTIFY ITSELF. NOTE THAT IF THERE IS 

246 * NO PHYSICAL CONSOLE THE PROGRAM WILL REQUEST 

247 THE OPERATOR FOR ‘INITIAL VALUE FOR THE 

248 SOFTWARE SWITCH REGISTER ‘SEE SECTION 8.5). 

249 IF RUNNING UNDER ACT, APT OR CHAIN THIS DOES 

250 NOT APPLY. 

251 $. THE PROGRAM WILL LOOP AND AN END OF PASS AND _ 
252 ERROR SUMMARY WILL BE TYPED AT THE END OF 

33, EVERY PASS. 

255 5. OPERATING PROCEDURE 

Pee ee RS a SR Tee se a ae 
* 257 

See 5.1 OPERATIONAL SWITCH SETTINGS 

— THE SWITCH SETTING ARE: gt ’ 

f 

262 OCTAL 

263 SW<15>=1. 100000 . HALT ON ERROR 

264 Serlieet 40000 LOOP ON CURRENT TEST 

265 SW<713>=1 20000 'NHIBIT ERROR TYPE OUTS 

266 SW<12>=1 10000 INHIBIT T-BIT TRAPPING 

267 SW<11>=1. 4000 INHIBIT ITERATIONS 

268 SW<10>=1... 2000 RING TTY BELL ON ERROR 

269 SW<9>=1.... 1000 LOOP ON ERROR 

270 SW<KBD=1 oes 400 LOOP ON TEST SPECIFIED IN SW<6> 
271 THROUGH SW<0> 

e7e Su<7>=1. 22s 200 PRINT ERROR SUMMARY EVEN IF 
273 Sw<13>=1, THIS APPLIES ONLY TO 
274 * PROGRAM CKFPACQ. 

27 SWKT>=1 ocae 200 SELECT CORRECT INTERRUPT TEST IN 
276 PROGRAM CKFPBBO. 
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6.2 


8.2 


8.3 


ERRORS 


SUMMARIES 


IN PROGRAM CKFPACO TESTS 1 AND 11 HAVE A SPECIAL 
ERROR SUMMARY FEATURE. THESE TWO TEST RI'N MANY 
TEST PATTERNS THROUGH THE LOGIC. AFTER AN_ ERA 
1S ENCOUNTERED, ONLY THE FIRST FIVE ERRORS ARE 
REPORTED (7YPED ON THE TTY). EVERY ERROR THOUGH IS 
LOGGED AND AN ERROR SUMMARY IS PRINTED WHEN /HE 
TEST IS COMPLETE. NOTE THAT IF SW<13>=1, THIS 
SUMMARY WILL NOT BE TYPED UNLESS SwW<7>=1. IN OTHER 
WORDS TO GET JUST AN ERROR SUMMARY FROM EITHER OF 
THESE TWO TESTS 1 AND 11 IN PROGRAM CKFPACO BOTH 
SWITCHES 13 AND 7 MUST = 1. 


ERROR RECOVERY 


SW<15:9>=0... MOST ERRORS WILL CAUSE EXECUTION 10 
GO TO THE START OF THE NEXT TEST 
AFTER THE MESSAGE IS TYPED. A_ FEW 
TESTS ARE IN SECTIONS. IN THESE 
TESTS AN ERROR WILL CAUSE EXECUTION 
TO GO TG THE NEXT SECTION AFTER THE 
MESSAGE IS TYPED. 


SW<15>=1... THE PROGRAM WILL HALT AFTER TYPING 
THE ERROR MESSAGE. PRESSING THE 
CONSOLE CONTINUE WILL CAUSE THE 
PROGRAM TO CONTINUE AS IF SW<15>=0. 


RESTRICTIONS 


NONE 


EXECUTION TIMES 
LESS THAN 10 SECONDS FOR EACH PROGRAM ON ANY PASS. 
STACK POINTER 


THE STACK POINTER IS INITIALIZED TO +100 IN EACH OF 
THE THREE PROGRAMS. 


PASS COUNT 
THE PROGRAM MAKES ONE PASS FOR EACH END OF _ PASS 
MESSAGE TYPED. THE END OF PASS MESSAGE DESCRIBES 


THE TOTAL NUMBER OF PASSES COMPLETED AND THE TOTAL 
NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE. 


SEQUENCE 


7 


(mo SE he 


a 


“KEPACH FRTTF FLTG PNT PRT A 


MACRO M1113 


8.4 


8.5 


8.6 


I 
28-MAR-81 12:56 PAGE 9 


T=B]T TRAPPING 


IF SW<12>=0 EACH PROGRAM WILL RUN WITH TRACE TRAPS 
ON EVERY OTHER PASS. FIRST PASS WILL _NOT ENABLE 
TRACE TRAPS. NOTE SW<i2>=1 DISABLES T-BIT TRAPS. 


SOFTWARE SWITCH REGISTER 


EACH OF THE THREE PROGRAMS WILL RUN WITH OR WITHOUT 
A CONSOLE SWITCH REGISTER. IF A PHYSICAL CONSOLE 
SWITCH REGISTER IS PRESENT ON THE SYSTEM, THEN THESE 
PROGRAMS WILL GO AHEAD AND USE IT FOR THE SWITCH 
FUNCTIONS DESCRIBED IN 5.1 ABOVE. IF HOWEVER THERE 
IS NO CONSOLE SWITCH REGISTER ON THE SYSTEM A 
SOFTWARE SWITCH REGISTER WILL BE USED. THIS 
SOFTWARE SWITCH REGISTER CAN BF EXAMINED OR MODIFIED 
AT ANY TIME BY THE USER IF HE TYPES CONTROL G_ WHILE 
THE PROGRAM IS RUNNING. THIS CONTRUL G WILL CAUSE 
THE CONTENTS OF THE SOFTWARE SW'TCH REGISTER TO BE 
TYPED ON THE TTY AND ASK THE USER FOR A NEW VALUE. 
WHEN THE USER TYPES A VALUE AND CARRIAGE RETURN THEN 
THE PROGRAM WILL RESUME TESTING AT THE SAME POINT AT 
WHICH IT LEFT OFF WHEN THE USER TYPED CONTROL G. 
NOTE THAT WHEN NOT RUNNING UNDER ACT, APT OR CHAIN 
THE USER WILL BE ASKED FOR A SOFTWARE SWITCH 
REGISTER VALUE AFTER LOADING ADDRESS 200 AND 
STARTING THE PROGRAM THE FIRST TIME THE PROGRAM IS 
RUN AFTER LOADING (ONLY IF NO CONSOLE SWITCH 
REGISTER IS ON THE SYSTEM). 


INTERRUPTS TEST 


IN PROGRAM CKFPBBO THERE IS A SPECIAL TEST FOR 
CHECKING THE CORRECT FLOWS OF THE FPP. THIS TEST 
CAN BE RUN ONLY IF A SPECIAL TEST MODULE IS_ IN_ THE 
SYSTEM, THIS MODULE WILL PROBABLY ONLY BE USED IN 
MANUFACTURING. IF THIS MODULE IS NOT IN THE SYSTEM 
THIS TEST WILL AUTOMATICALLY BE DESELECTED. IF THIS 
+ te] MODULE IS ON THE SYSTEM AND SW<7>=1 THIS TEST 

WIL BE RUN. IF SwW<7>=0 THIS TEST WILL BE 
DESELECTED. 


ACT, APT AND XXDP COMPATIBILTY 
THE SE — ARE FULLY COMPATIBLE WITH: 


ACT 
XXDP MONITOR AND CHAIN PROGRAMS. 


SEQUENCE 
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38% 9. PROGRAM DESCRIPTION 

Ret Sa RE ee Re i Ati WP ns IE EE I ae ieenrnneciatel 

385 

ry! TEST 1 LDFPS, STFPS AND DATA PATHS TEST 

7Re 

TRS THIS IS A TEST OF THE LDFPS (LOAD FLOATING POINT 
so STATUS) AND STFPS (STORE FLOATING POINT STATUS) 
39" INSTRUCTIONS. A COUNT PATTERN IS GENERATED AND RUN 
. THROUGH THE FLOATING POINT STATUS REGISTER. THIS 
7,2 WILL TES? THE 16-BIT TRI STATE BUS WHICH CONNECTS 
234, THE CPU WITH THE FPP AND ALSO RUNS INTERNALLY WITHIN 
£45 THE *PP. ONLY DMO AND SMO ARE USED. NOTE THAT A 
a MASK MUST BE USED BECAUSE SOME OF THE FPS BITS 
4? CANNOT BE SET. 

og ONLY THE FIRST iivE ERRORS WILL BE REPORTED 
et INDIVIDUALLY. HIS IS tu PREVENT LOCKING OUT THE 
401 COMPLETION OF THE TEST BECAUSE C®& VIRTUALLY ENDLESS 
622 * NUMBER OF ERRORS. ONLY FIVE INDIVIDUAL ERRORS WILL 
60 BE REPORTED THEN THE TEST WILL BE COMPLETED AND AN 
60S ERROR SUMMARY GIVEN (SEE NOTE BELOW). 


NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE 


4&9 LOGICAL ‘AND' AND 'OR' OF THE FAILING DATA PATTERNS. 
408 THESE CAN BE VERY USEFUL IN DETERMINING STUCK BITS. 
“09 IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH 
410 (SWR13) OFF, THEN THE USER WILL RECEIVE EACH 
411 INDIVIDUAL ERROR MESSAGE PLUS AN ERROR SUMMARY AT 
41 THE END OF THE TEST. INHIBITING ERROR PRINT OUT 
41 WILL INHIBIT ERROR SUMMARY PRINT OUT, EXCEPT IN THE 
414 CASE DESCRIBED BELOW. TO GET JUST THE ERROR SUMMARY 

415 WITH NO INDIVIDUAL ERROR REPORTS, SET SWITCH 
aig REGISTER BI113 AND SWITCH REGISTER BIT? BOTH ON. 

4 

418 TEST 2 CFCC TEST 

Sem OME tess EO Se ee = mene 

420 

421 THIS IS A TEST OF THE COPY CONDITION CODES 
422 INSTRUCTION, CFCC. 

423 

424 

425 TEST 3 SETF, SETD, SETI AND SETL TEST 

427 

428 THIS IS A TEST OF THE SETF, SETD, SETI AND SETL 
429 INSTRUCTIONS. EACH INSTRUCTION IS EXECUTED WITH THE 
430 FPS CONTAINING ALL ONES AND ALSO WITH THE FPS CLEAR. 

431 THE RESULT OF EACH SITUATION IS CHECKED. 
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ILLEGAL FPP OP CODF S AND _ STS? TEST 


THIS IS A TEST OF THE FTP OPERATION CCULS: 
170003 
170004 


170010 
170018 
170014 


170077 


THESE ARE ILLEGAL INSTRUCTIONS AND WITH INTERRUPTS 
ENABLED SHOULD CAUSE A _ TRAP TO 244, ALSO TESTED 
HERE IS THE INSTRUCTION: STST R1, WhiCH SHOULD PUT 
THE FEC CODE 2 IN RI, AFTER ANY OF THE ABOVE OP 
CODES IS EXECUTED. 


FID, INTERRUPT DISABLE, BIT TEST 


THIS IS A TEST OF FPS oy 14 (FID) OR FLOATING 
INTERRUPT DISABLE. ILLEGAL INSTRUCTION IS 
EXECUTED WITH FID=1. NO MINTERRUPT SHOULD OCCUR. 


LDD AND STD, WITH SRC AND DST MODE 1, TEST 


THIS IS A TEST OF BOTH THE INSTRUCTION: 
LDD (RO) ,ACO 
AND THE INSTRUCTION: 
STD ACO, (RO) MOST OF THE 


FAILURES ARE ISOLATED TO THE SRC OR DST FLOWS. NOTE 
THAT THE INTEGRITY OF ACO HAS NOT BEEN ASSURED. 
THIS MEANS THAT IN SOME CASES IT WILL BE IMPOSSIBLE 
TO ISOLATE CERTAIN DATA PATTERN FAILURES TO EITHER 
THE FLOWS OR THIS ACCUMULATOR. 


FSRC MODE 0 TEST 


THIS IS A TEST OF FSRC MODE ZERO USING THE LDD AND 
LDF INSTRUCTIONS. 


FDST MODE O TEST 


THIS IS A TEST OF THE STORE INSTRUCTIONS, STD AND 
STF, WITH FDST MODE 0. 


SEQUENCE 
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TEST 11 


ACCUMULATORS DATA PATTERNS TEST 


THIS iS A TEST OF THE FLOATING POINT PROCESSOR 
ACCUMULATORS. 


EACH era IS TESTED IN TWO WAYS: 
TEST PATTERN GENERATED BY FLOATING A 
ONE ACROSS A FIELD OF ZEROES. 
2 TEST eying ee BY FLOATING A 
ZERO ACROSS A FIELD OF ONES. 
EACH OF ACCUMULATORS ACO THROUGH AC5 = TESTED. 


NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE 
LOGICAL ‘AND’ AND ‘OR* OF THE FAILING DATA PATTERNS, 
THESE CAN BE VERY USEFUL IN DETERMINING STUCK E . 
IF THE USER HAS THE INHIBIT ERROR TYPE OUT SW] ! 
(SWR13) OFF, THEN THE USER WILL RECEIVE € 4 
iNDiviDUAL ERROR MESSAGE PLUS AN ERROR SUMMARY AT 
THE END OF THE TEST. HIBITING ERROR PRINT OUT 
WILL INHIBIT ERROP SUMMARY PRINT OUT, EXCEPT IN THE 
4-3 DESCRIBED BELOW. TO GET JUST THE ERROR SUMMARY 
WITH NO INDIVIDUAL ERROR REPORIS, SET SWITCH 
REGISTER BiTis AND SWITCH REGISTER BIT? BOTH ON. 


THE FOLLOWING PROCEDURE IS_ PRESENTED TO AID THE 
TROUBLE SHOOTER IN SITUATIONS WHERE AM2901 CHIP 
ISOLATION IS ATTEMPTED. 


WARNING: THIS PROCEDURE ASSUMES THAT THE FAULT IS 
IN ONE OF THE AM2901 CHIPS. THIS ASSUMPTION IS NOT 
NECESSARILY VALID IN ALL SITUATIONS. IT REMAINS 10 
BE SEEN WHAT NUMBER OF FAILURES CAN 
PROBABLILISTICALLY ASSOCIATED WITH THEM. NOTE ALSO 
THAT THIS INFORMATION SHOULD NOT BE _ TAKEN AS 
ABSOLUTE, THAT IS THIS INFORMATION IS THE AUTHOR'S 
SUGGESTION FOR ACHIEVING ISOLATION WHEN CHIP LEVEL 
REPAIR IS NECESSARY. 


WHEN THIS TEST HAS FINISHED RUNNING, IF ERRORS HAVE 
OCCURRED, AN ERROR SUMMARY WILL BE TYPED. THUS 
‘SUMMARY WILL ayy OF TWO IMPORTANT QUANTITIES: 
FOUR SIXTEEN BIT NUMBER S LABELED THE 
LOGICAL ‘AND’ (‘*") OF THE FAILING 
DATA PATTERNS. 


8. FOUR SIXTEEN at A eee LABELED THE 
LOGICAL ‘OR’ OF THE FAILING 
DATA PATTERNS. 


SEQUENCE 11 
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A BIT STUCK HIGH IN THE HARDWARE WILL SHOW UP AS A 0 
ie POSITION OF THE ‘OR’ OF THE FAILING DATA 


A BIT STUCK LOW IN THE HARDWARE WILL SHOW UP AS A 1 
IN THAT BIT POSITION OF THE ‘AND’ OF THE FAILING 
DATA PATTERNS. 


THUS IF A FAILURE OCCURS: 
A. STU a HIGHS WILL SHOW AS O'S IN’ THE 
‘OR' PATTERN 


B. STUCK LOWS WILL SHOW AS 1°S IN THE 
"AND' PATTERN. 


OF BITS THEN THE FAULT WILL PROBABLY NOT SHOW UP_IN 
THE 'AND' OR THE ‘OR’ PATTERNS; IN THIS CASE THE 
*AND* PATTERN WILL BE ALL 0°S AND THE ‘OR' PATTERN 
WILL BE ALL 1°S. WHEN THIS OCCURS SOME OTHER METHOD 
OF REPAIR MUST BE FOUND (SUCH AS INSPECTION OF EACH 
ay td ERROR REPORT RATHER THAN USING THE 


MAP THE FOLLOWING NOTATION ONTO EACH BIT POSITION IN 
THE ‘AND' AND THE ‘OR' PATTERNS WHICH ARE TYPED IN 
THE ERROR SUMMARY. 


A15,A14,...A1,A0 815,B14,...B1,B0 
C15,C14,...€1,C0 D15,D14,...C1,C0 


IN THIS NOTATION A15 THROUGH AO IS THE FIRST OF THE 
FOUR 16 BIT OCTAL NUMBERS.TYPED, B15 THROUGH BO IS 
THE SECOND, ETC. 


THIS TABLE SHOWS THE CORRESPONDING AM2901 CHIP (‘E 
NUMBER) WHICH IS RESPONSIBLE FOR EACH BIT POSITION 
USING THE ABOVE NOTATION. NOTE THAT ECO'S TO THE 
HARDWARE MIGHT MAKE THIS TABLE OBSOLETE IF IT IS NOT 
UP DATED. NOTE ALSO THAT THERE ARE FOUR BITS FOR 
EACH AM2901 CHIP: 


SEQUENCE 
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BITS AM2901 CHIP NUMBER 
A15,A14,A13,Al2 £37 
A11_A10.A9,A8 E45 
A7,A6,A5,AG £34 
A3.A2.A1.A0 E42 
B15,B14,B13,B12 £33 
B11 .B10.B9, E41 
B7,B86,85,B E36 
83.B2.B1, £44 
€15,€14,C€13,C12 £35 
€11.C10,C9,C8 £43 
€7,06,€5,04 £38 
€3,C2,C1,C0 E46 
D15,014,D13,D12 £39 
D11.Di0.D9,D E47 
D7,06,D5,D4 E40 
D3.D2.D1,D0 £48 


NOW FIVE IMPORTANT CASES WHICH WILL ARRISE WHEN A 
FAULTY AM2901 IS PRESENT CAN BE DESCRIBED: 


1. 


) 


IF ONLY ONE BIT OF. THE 64 BITS IS _INCORRECT 
THE CHIP INDICATED IN THE ABOVE TABLE IS 
MOST PROBABLY AT FAULT. 8° IF THAT CHIP IS 
at sit - THE ERROR PERS'STS THEN SUPPOSE 


LN WHERE ‘L*' IS A, B, C OR D 
AND N IS 15, 14, ... OR O 


THEN IN GENERAL ANY OF THE FOUR CHIPS 
RESPONSIBLE FOR AN, BN, CN OR DN COULD BE AT 
FAULT, WITH LN BE'NG MOST PROBABLE. 

FOR EXAMPLE _IF BIT cle IS FAULTY, 

THEN CHIF E IS MOST 

PROBABLE SQURCE OF TONE ERROR. IF REPAIRING 
THAT CHIP DOES NOT REMOVE THE FAULT THEN TRY 
EACH OF THE CHIPS aes Ae WITH BITS Ald, 
B12 AND Dj2 SHOULD BE TRIED y be of gual 
PROBABILITY OF THE FAULT BEING IN 


THESE OTHER THREE CHIPS, TRY CHIPS “tol. OnEBe. AND E78. 


SEQUENCE 
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a il a 
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irons: SHOULD RESULT IN A 


SEQUENCE 


IF THERE ARE FOUR gg BITS IN ERROR, 
FOLLOWING THE PATTERN 


LN, LN¢1, LN+2 AND LN*3 WHERE 'L' IS A, B, C OR D 
N=0, 4, 8 OR 12 
THEN THE ABOVE TABLE SHOULD DIRECTLY 


IDENTIFY THE FAILING CHIP. 


IF FOUR BITS ARE DROPPED WHICH FIT THE 
PATTERN: 

AN, BN, CN AND DN 
OR 0 


WHERE N=15, 14, eee OR 0 


THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
WITH EACH OF THE BITS AN, BN, CN AND DN 
COULD BE AT FAULT WITH EQUAL PROBABILITY. 


IF 16 hoch: ARE IN ERROR, FITTING THE 
PATTERN 


AN, AN+1, AN+2, AN+3 
BN, BN+1, BN+2, BN+3 
CN, CN+1, CN+2, CN+3 


AND 
DN, DNe1 DN+2, AN+3 


THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
WITH THESE BITS COULD BE AT FAULT WITH EQUAL 
PROBABILITY. 


IF THE SAILING BIT PATTERNS DISPLAYED IN THE 
AND’ AND THE ‘OR’ DATA TYPED _IN THE SUMMARY 
DOES NOT CONFORM EXPLICITELY TO ANY OF _ THE 
ABOVE PATTERNS, THEN THE TROUBLE SHOOTER 
MUST INTUITIVELY TRY TO FIND WHICH OF THE 
ABOVE CASES (1 THROUGH 4) IS A ‘BEST FIT" OF 
THE SYMPTOMS. 


FPP ACCUMULATORS DUAL ADDRESS TEST 


WHERE N=0, 4, 8 OR 12 


wn 


THIS TEST PERFORMS A DUAL ADDRESSING TEST ON _ THE 
FLOATING ACCUMULATORS. 
1S USED TO ACCESS ALL THE OTHERS. 


NOTE THAT ACCUMULATOR ZERO 


FSR¢ MOVE 0 WITH ILLEGAL ACCUMULATOR TEST 


A TEST OF FSRC MODE 0 WITH ACCUMULATORS 6 
USE OF EITHER OF THESE NON-EXISTENT 
A TRAP TO 244 WITH 

LLEGAL FPP INSTRUCTION?. 


—_------—-_—_———-- 


| 
| 
| 
| 
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TEST 14 


TEST 15 


TEST 20 


TEST 21 


FSRC MODE 2 TEST 


THIS IS A TEST OF FSRC MODE 2, AUTO INCREMENT MODE. 
FSRC MODE 4 TEST 


THIS IS A TEST OF FSRC MODE 4, AUTO DECREMENT MODE. 
FSRC MODE 2, WITH FD=0, TEST 


THIS IS A TEST OF FSRC MODe 2 WITH FD=0. (AUTO 
INCREMENT) 


FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 


THIS IS A TEST OF FSRC MODE 2 USING GR7 (THE PC). 
THIS IS IMMEDIATE MODE. 


FSRC MODE 3 TEST 


THIS IS A TEST OF FSRC MODE 3, AUTO INCREMENT 
DEFERRED 


FSRC MODE 5 TEST 


THIS IS A TEST OF FSRC MODE 5, AUTO DECREMENT 
DEFERRED. 


FSRC MODE 6 TEST 


THIS IS A TEST OF FSRC MODE 6, INDEX MODE 
FSRC MODE 7 TEST 


THIS IS A TEST OF FSRC MODE 7, INDEX DEFERRED MODE. 


-—-----— 


j 
D 2 
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NNN NN NN NN NN ON NNN 
SAAC YASS Ve Vo 
OODWNANEWH 0 COON 


TEST 24 


TEST 25 


TEST 31 


TEST 32 


(BUT EZBT Y8), (BUT ENBT) AND (BUT FIUV) TEST 


aa tH IS A TEST OF THE (BUT EZBT Y8) FORK, THE (BUT 
ENBT) FORK AND (BUT FIUV) FORK IN THE LOAD 
INSTRUCTION FLOWS. 

EACH OF THE PATTERNS: 


0 
+NUM 
-NUM 
-0 
1S LOADED TWICE, ONCE WITH AC>O THEN WITH AC=0. 
AFTER EACH LOAD THE FPS IS CHECK TO INSURE THAT 
CONTROL WAS PASSED THROUGH WITH THE FORKS PROPERLY. 


ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 


THIS IS A TEST OF ADD AND SUB WITH FSRC=AC=0 
ADDD AND SUB WITH FSRC=0 


THIS IS A TEST OF ADD AND SUB WITH FSRC=0. 
SUBD WITH AC=0 TEST 


THIS IS A TEST OF SUBD WITH AC=0. 
NEGATIVE FSRC'S ARE TRIED. 


ADDD WITH AC=0 TEST 


BOTH POSITIVE AND 


POSITIVE AND NEGATIVE FSRC'S ARE TRIED. 
ADDF AND ADDD WITH E(AC)=E(FSRC) AND (BUT FT) TEST 


THIS IS A TEST OF THE ADD_ INSTRUCTION WITH THE 
OPERANDS HAVING EQUAL EXPONENTS. THE (BUF FT) FORK 
IN THE ROUND/TRUNK FLOWS IS ALSO TESTED. 


ADDF AND ADDD WITH E(AC) LESS THAN E(FSRC) TES? 


THIS IS ATEST OF THE ADDD AND ADDF INSTRUCTIONS AND 
THE ALIGN AC ALGORITHM FLOWS. THE CONSTANT (25 FOR 
FLOATING, 57 FOR DOUBLE) USED IS CHECKED. THEN 
SIMPLE AND WORST CASE ALIGNMENT SITUATIONS ARE 
TRIED. NOTE ECAC) IS LESS THEN E(FSRO) 


SEQUENCE 
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773 TEST 33 ADDF AND ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


776 THIS IS A TEST OF THE ADDD AND ADDF INSTRUCTIONS AND 
777 THE ALIGN FSRC ALGORITHM FLOWS. FIRST THE CONSTANT 
77 USED IS CHECKED. THEN SIMPLE AND WORST _ CASF 
779 ALIGNMENT SITUATIONS ARE TRIED. NOTE ECAC) IS 


r 
| 
| 
} 
| 
rat GREATER THAN E(FSRC). 
782 | TEST 34 ADDD WITH NEGATVE OPRANDS TEST 


785 2 THIS IS A TEST OF THE ADDD INSTRUCTION WITH NEGATIVE 
ag) Ana EVERY COMBINATION OF OPERAND SIGNS IS 


789 TEST 35 SUBD TEST 
790 ta tesie sas SS we ee eS 


792 THIS IS A TEST OF THE SUBD INSTRUCTION. BOTH A 
ae, ry ne AND A NEGATIVE NUMBER IS SUBTRACTED FROM IT 
L 


796 TEST 36 NORMALIZE ALGORITHM TEST 


799 THIS IS A TEST OF THE NORMALIZE FLOW ALGORITHM. TWO 
800 PATTERNS ARE USED, FIRST THE MINIMUM SITUATION 
801 REQUIRING ONE LEFT SHIFT AND THEN THE MAXIMUM 
802 SITUATION REQUIRING 56 SHIFTS. 





fo 
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*PRIORITY LEVEL DEF INI TIONS 





| 
| 808 10. LISTING 
B04 ; a=-s---- 
805 ¢ 
806 900214 MNUMBER=214 
| 807 000001 ROGNUM= 1 
808 -LIST ME 
| 809 "NLIST MD.MC,CND 
1403 000000 “ENABL ABS 
1404 -MCALL HEADER, SWRH! , .EQUAT, , SETUP, $CATCH, .SACT11,.$CMTAG 
1405 "MCALL $TYPE, .SEOP, .$SAVE,.$TYPOCT 
1406 "MCALL _$TYPDEC, .$TRAP, .$POWER, . SAPTHDR, . SAPTBLS 
1407 .MCALL .$APTYPE,.$READ 
1408 -MCALL .EQUIV s*REMOVE FOR ASSEMBLY ON PDP=-10 
1409 LTITLE CKFPACO FPIIF FLTG PNT PRT A 
teCOPYRIGHT (C) 1981 
; sDIGITAL EQUIPMENT CORP. 
MAYNARD, MASS. 01754 
“oe 
* STHIS PROGRAM WAS ASSEMBLED USING THE PDP=11 MAINDEC SYSMAC 
;*PACKAGE (MAINDEC-11=DZQAC=C5), JAN, 1981. 
000001 $1N 
760000 $cuR=160000 ::HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 
1410 000244 FPVECT=244 
1411 177400 $SWR=177400 
1412 000200 $SWRMSK=200 
1413 00001 1 TAB=11 
1414 000015 CRLF=15 
1415 “SBITL BASIC DEFINITIONS 
s*INITIAL ADDRESS OF THE STACK POINTER *** 1100 «** 
001100 STACK= 1100 
104000 ERROR=EMT 
000004 SCOPE=10 
; #MISCELLANEOUS DEFINITIONS 
000011 ur 11 CODE FOR HORIZONTAL TAB 
000012 LF= 12 3 CODE FOR LINE FEED 
600015 CR= 15 “CODE FOR CARRIAGE RETUR 
000200 CRLF= 200 *S CODE FOR CARRIAGE RE TURN@L INE FEED 
177776 PS= 177776 : PROCESSOR STATUS WORD 
177776 PSW=PS 
177776 STKLMT= 177774 =:STACK LIMIT REGISTER 
177772 PIRQ= 177772 PROGRAM INTERRUPT REQUEST REGISTER 
177570 DSWR= 177570 ; HARDWARE SWITCH REG!STER 
177570 DDI SP= 177570 ARDWARE DISPLAY REGISTER 
: *GENERAL PURPOSE REGISTER MDEF INI TIONS 
000000 RO= %0 = :GENERAL REGISTER 
000001 ' R1= %1 + GENERAL REGISTER 
000002 R2= %2 :: GENERAL REGISTER 
000003 R3= %3 +: GENERAL REGISTER 
000004 RG= %% + GENERAL REGISTER 
600005 RS= %5 +: GENERAL REGISTER 
R6= %6 S:GENERAL REGISTER 
000007 R7= 47 “GENERAL REGISTER 
000006 SP= 6 : STACK POINTER 
000007 PC= 47 PROGRAM COUNTER 
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BASIC DEFINITIONS 


000000 PRO= 0 ::PRIORITY LEVEL 0 
| 0 PR1= 40 ::PRIORITY LEVEL 1 
000100 PR2= 100 >:PRIORITY LEVEL 2 
Ss 000140 PR3= 140 +:PRIORITY LEVEL 3 
| 0002 PR4= 200 *:PRIORITY LEVEL 4 
000240 PR5= 240 *:PRIORITY LEVEL 5 
000300 PR6= 300 *PRIORITY LEVEL 6 | 
000340 PR7= 340 +:PRIORITY LEVEL 7 
:*''SWITCH REGISTER’’ SWITCH DEFINITIONS | 
109000 Swi5= 100000 | 
040000 Sw14= 40000 
20000 Sw13= 20000 
010000 Swi2= 10000 
000 Sw11= 4000 
002000 Swi0= 2000 
001000 swo9= 1000 
00 SwO8= 400 
0002C0 SwO7= 200 
000100 SwO6= 100 
000046 swOS= 40 
000020 SwO4= 20 
000010 SwO3= 10 
000004 SwO2= 4 
000002 SwOl= 2 
000001 Swo0= 1 
001900 SwW9=SwO9 
000400 Sw8=SWw08 
000200 SwW7=SwO7 
000100 SW6=SW06 
000040 Sw5=SwO5 
000020 SwW4=SWO4 
000010 SW3=SwW03 
Sw2=Sw02 
Sw1=Sw01 
000001 SwO=SWw0O 
:*DATA BIT DEFINITIONS (BITOO TO BIT15) 
00000 BIT15= 100000 
0000 BIT14= 40000 
020000 BIT13= 20000 
1000u BIT12= 10000 
004000 BIT11= 4000 ; 
002000 BIT10= 2000 y 
001000 BITO9= 1000 ‘a 
400 BITOB= 400 = 
000200 BITO7= 200 
00 06= 100 
05= 40 
04= 20 
03= 10 
O2g= 4 , 
Ol= 2 
OO= 1 | 
BIT9=BIT09 ; 
BIT8=B1T08 
BIT7=BIT07 
BI T6=B1 T06 
BIT5=BITOS 
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000020 BIT4=BIiGs 

000010 B11 3=BiT03 

00004 BIT2=BITO2 

0000 8171=81T01 

000001 BI T0=B1T00 

;*BASIC ‘'CPU'' TRAP VECTOR ADDRESSES 
ERRVEC= 4 ME OUT AND OTHER ERRORS 

000010 RESVEC= 10 : RESERVED AND ILLEGAL INSTRUCTIONS 

000014 TBITVEC=14 "BIT 

000014 TRIVEC= 14 : TRACE TRAP 

000014 BPTVEC= 14 ; !BREAKPOINT TRAP (BPT) 

000020 IOTVEC= 20 Fe ey tug TRAP (IOT) **SCOPE** 

000024 PWRVEC= 24 :EPOWER AIL 

000030 EMTVEC= 30 ms TRAP (EMT) **ERROR®* 

34 TRAPVEC=34 ;"'TRAP"’ TRAP 

000060 TKVEC= 60 TTTY KEYBOARD VECTOR 

000064 TPVEC= 64 SITY Ae yg VECTOR 

000240 PIRQVEC=240 OGRAM INTERRUPT REQUEST VECTOR 
1416 .SBITL FPP REGISTER DEF INI TIONS 
1417 ACO =%0 
1418 000001 AC] =%1 
1419 000002 AC2 =%2 
1420 000003 AC3 =%3 
3421 000004 ACS =%4 
1422 000005 AC5 _ 
1424 000007 AC7 =%r 
1426 - SBTTL TRAP CATCHER 


7 *ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN & * 
T*SEQUENCE TO CATCH ILLEGAL 
:*LOCATION Q CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


000174 
000174 000000 DISPREG: 
000176 000000 SWREG 


-WORD Q 


~ 000200 000137 003616 


: -WORD O 
. SBITL START ING ADDRESS(ES) 
JMP @4START 


02 HAL yee 
TRAPS AND INTERRUPTS 


77 SOF TWA, DISPLAY REGISTER 
72 SOFTWARE SWITCH REGISTER 


72 JUMP TO STARTING ADDRESS OF PROGRAM 


SEQUENCE. 


20 


1427 


sesesssesssssess 
SRRVBSaKNSRLGLSS 


Wrontonrn—-- = 


001132 
34 


oO 
NM 


ak aed aed ed ed ed ed 
ond end aad and end ac sd 
SNNNWN 


88888S8838sss 
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«SBTTL 


SCMTAG: 


STSTNM: . 


$A! TOB: 


COMMON TAGS 
SLR E RRR REE RE RETR TEER REE RARER EERE ERE REE REE RES 
*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

;*USED IN y 1300" PROGRAM. 


BDOOVOOOC90900 ~- OC 3.00000 


O09 
Se 
as 
v 


Nm 


O° 
= 
wn 


COODOOCOOOOCOCVOCOCOCOCOCOF CO—NO 


37 START OF 
3 CONTAINS 


SEQUENCE 


COMMON TAGS 


THE a NUMBER 

ERROR FLAG 

SUBTEST ITERATION COUNT 
SCOPE LOOP ADDRESS 
SCOPe RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 

MAX. ERRORS PER TEST 

PC OF LAST ERROR INSTRUCTION 
ADDRESS OF ‘GOOD DATA 
ADDRESS OF "BAD" DATA 
*GOOD’ DATA 


S *BAD' DATA 


-* ON 
: ;RESERVED=-NOT TO .£ USED 


3 ;AUTOMATIC MODE INDICATOR 
3. INTERRUPT MODE INDICATOR 


ADDRESS OF SWITCH REGISTER 
: ZADDRESS CF DISPLAY REGISTER 
3:TTY KBD STATUS 


:zTTY KBD 


BUFFER 


iz TTY PRINTER STATUS REG. ADDRESS 

iz TTY PRINTER 3UFFER REG. ADDRESS 

2: CONTAINS WULL CHARACTER FOR FILLS 
PCONTAINS # OF FILLER CHARACTERS REQUIRED 

»: INSERT FILL CHARS. AFTER A ‘LINE F 
“TERMINAL AVAILABLE'' FLAG (BIT<07>=0=YES) 

7:CONTAINS THE ADDRESS FROM 


;sWHICH ($REGO) WAS OBTAINED 


3;CONTAINS ((S$REGAD) +0) 
7:CONTAINS (($REGAD) +2) 
CONTAINS (($REGAD) +4) 
7;CONTAINS (($REGAD) +6) 
;-CONTAINS (($REGAD) +10) 
oe TAINS (($REGAD) +12) 
;:CONTAINS (($REGAD) +14) 
:zCONTAINS (($REGAD) +16) 
CONTAINS (($REGAD) +20) 
gs TAINS (($REGAD) +22) 
a3 TAINS ((SREGAD) +24) 
72 CONTAINS (($REGAD) +26) 
7:CONTAINS (($REGAD) +30) 
CONTAINS (($REGAD) +32) 
7: CONTAINS (($REGAD) +34) 
7: CONTAINS (($REGAD) +36) 
7: CONTAINS (($REGAD) +40) 
7: CONTAINS (($REGAD) +42) 
72 CONTAINS (($REGAD) +44) 


21 
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COMMON TAGS 


00123 000000 $REG23: .wORD 0 sz CONTAINS (($REGAD) +46) 
000024 .REPT = 26 “e . pn 
001232 000000 $TMPO: .WORD 0 - g2USER DEFINED 
651234 000000 $™MP1: WORD 0 _ZUSER DEFINED 
001236 000000 $TMP2: WORD 0 _ "SSUSER DEFINED 
001249 000000 $TMP3: .WORD 0 ~ |; ;USER DEFINED 
001242 000000 $TMP4: . WORD 0 + :USER DEFINED 
001244 000000 STMPS: .WORD 0 “  S:USER DEFINED 
001246 000000 $TMP6: .WORD 0 ::USER DEFINED 
001250 000000 $TMP7: .WORD 0 ::USER DEFINED 
001252 000000 $T™MP10: .WORD 0 : USER DEFINED 
001254 000000 $TMP11: .WORD 0 s USER DEFINED 
001256 000000 $TMP12: .WORD 6 sZUSER DEFINED 
| 001260 000000 $TMP13: .WORD 0 ZZUSER DEFINED 
001262 000000 $T™MP14: .WORD 0 Z:USER DEFINED 
001264 000000 $TMP15: .WORD 0 s7USER DEFINED 
001266 000000 $T™MP16: .WORD 0 + ZUSER DEFINED 
001270 000000 $TMP17: .WORD 0 s USER DEFINED 
001272 000000 $TMP20: .WORD 0 :ZUSER DEFINED 
601274 000000 $TMP21: .WORD 0 TIUSER DEFINED 
001276 000000 $TMP22: .WORD 0 ::USER DEFINED 
001300 000000 . $TMP23: .WORD 0 + USER DEFINED 
001302 000000 STIMES: 0 >:MAX. NUMBER OF ITERATIONS 
001304 000000 $ESCAPE :0 ZESCAPE ON ERROR ADDRESS 
901 306 207 277 377 $BELL: .ASCIZ <207><377><377> = CODE FOR BELL 
001312 077 $QUES: ASCII /2/ Z QUESTION MARK 
001313 015 $CRLF: . ASCII <15> +: CARRIAGE RETURN 
001314 012 000 $LF: wASCIZ <12> ZILINE FEED 


'WEtOeAAAARARAAARARASAARRRARRARARARRRARASA RE RRR RAR RRR RAR ARS S RRR ASSESS | 


*SBITL APT MAILBOX-£ TABLE 


SF AAAAAARAAAAAARAAARAAARAAEAEAAAAAAAAAAAAAAARAAARAAARAAAAAARAARERAAARE 


EVEN 

001316 $MAIL: MAILBOX 

001316 000000 SMSGTY: .WORD AMSGTY Re SSAGE TYPE CODE 

001320 000000 $FATAL: .WORD AFATAL ::FATAL ERROR NUMBER 

001322 00000 STESTN: .WORD ATESTIN ::TEST NUMBE 

001324 000000 $PASS: .WORD APASS ::PASS COUNT 

1326 000000 $DEVCT: .WORD ADEVCT ;:DEVICE COUNT 

001330 SUNIT: WORD AUNIT ::1/0 UNIT NUMBER 

001332 000000 $MSGAD: .WORD AMSGAD ::MESSAGE ADDRESS 

001334 000000 SMSGLG: .WORD AMSGLG ;:MESSAGE LENGTH 

001336 SE TABLE: ::APT ENVIRONMENT TABLE 

001336 000 SENV:  .BYTE AENV  ;:ENVIRONMENT BYTE 

001337 000 SENVM: .BYTE AENVM  ;;ENVIRONMENT MODE BITS 

001340 000000 SSWREG: .WwORD ASWREG ;:APT SWITCH REGISTER 

001342 900000 $USWR: .WORD AUSWR i USER SWITCHES 

001344 000000 $CPUOP: .WORD ACPUOP ::CPU TYPE,OPTIONS 
* BITS 15-11=CPU TYPE 
te 11/04=01, 11/05=02, 11/20=03, 11/40=04,11/45=05 
te 11/70=06.PD 9=07, Q=10 
:° BIT 10=REAL TIME CLOCK 
* BIT 9=FLOATING POINT PROCESSOR 
-* BIT 8=MEMORY GEMEN 

001346 000 $MAMS1: .RYTE S1  ;:HIGH ADDRESS,M.S. OYE 

001347 000 $MTYP1: .BYTE AMTYP1 ;:MEM, TYPE, 


ka 
th MEM.TYPE BYTE == (HIGH BYTE) 
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APT MAILBOX-€ TABLE : 


s* 900 NSEC CORE=001 
:* 300 NSEC BIPOLAR=002 
,* 500 NSEC MOS=003 
001350 000000 $MADR1: .WORD AMADR1 ;;:HIGH ADDRESS,BLKA1 
=@ MEM.LAST ADDR.=3 BYTES, THIS WORD AND LOW OF ‘‘TYPE** ABOVE 
001352 000 $MAMS2: .BYTE AMAMS2 ;;HIGH ADDRESS.M.S. BYTE 
001353 000 $MTYP2: .BYTE AMTYP2 ;;MEM.TYPE,BLK&2 
001354 000000 SMADR2: .WORD AMADR2 ;;MEM.LAST ADDRESS,BLK42 
001554 000 $MAMS3: .BYTE AMAMS3 ;;HIGH ADDRESS.M.S.BYTE 
001357 000 S$MTYP3: .BYTE AMTYP3 ;;MEM.TYPE 
001360 000000 SMADR3: . D AMADR3 :;MEM.LAST ADDRESS,BLK&3 
001362 000 $MAMS4: .BYTE | AMAMS4 ;;HIGH AD[RESS,M.S.BYTE 
001363 000 SMTYP4: .BYTE AMTYP4 ;;MEM.TYPE,BLKA&4 
001364 000000 SMADR4: .WORD AMADR4 ;;MEM.LAST ADDRESS,BLK&4 
000000 SVECT1: .WORD AVECT1 ;; INTERRUPT VECTOR#1,BUS PRIORITYA1 
001370 000000 $VECT2: .WORD AVECT2 ;; INTERRUPT VECTOR#2BUS PRIORITY#2 
001372 000000 $BASE: .WORD ABASE :;RASE ADDRESS OF EQUIPMENT UNDER TEST 
001374 000000 SDEVM: .WORD ADE VM s:DEVICE MAP 
001376 000000 $CDw1 .~ WORD ACDW1 :: CONTROLLER DESCRIPTION WORDA1 
601400 000000 $C(DW2: .WORD ACDW2 ;;CONTROLLER DESCRIPTION WORD#2 
901402 000000 $DDWO: .WORD ADDWO ::DEVICE DESCRIPTOR WORD#0 
001404 000000 $DDw1:  .WwORD ADDW1 DEVICE DESCRIPTOR WORD#1 
C01406 000000 $DDW2: .WORD ADDW2 ::DEVICE DESCRIPTOR WORDA2 
001410 00C900 $DDW3: .WORD ADDW3 : DEVICE DESCRIPTOR WORDAS 
001412 $DDW4 WORD ADDW4 ::DEVICE DESCRIPTOR WORDA4 
001414 000000 $DDWS WORD ADDW5 : DEVICE DESCRIPTOR WORDAS 
001416 000000 $DDW6 WORD ADDW6 ::DEVICE DESCRIPTOR WORDA6 
001420 000000 $DDw7 » WORD ADDW7 : DEVICE DESCRIPTOR WORDAs7 
001422 600000 $DDw8 .~ WORD ADDw8 ::DEVICE DESCRIPTOR WORD#8 
001424 000000 $DDW9: .WORD ADDW9 ::DEVICE DESCRIPTOR WORDA9 
001426 000000 $DDW10: .WORD ADDW10 ;;DEVICE DESCRIPTOR WORD#10 
001430 000000 $DDW11: .WORD ADDW11 ;;DEVICE DESCRIPTOR WORDA#11 
001432 000000 $DDW12: .WORD ADDW12 ;;DEVICE DESCRIPTOR WORD#12 
001434 000000 $DDW13: . WORD ADDW13 ;;DEVICE DESCRIPTOR WORD#13 
001436 000000 $DDW14: .WORD ADDWi4 ;;DEVICE DESCRIPTOR WORDA14 


001440 000000 $DDW15: .WORD ADDW15 ;:DEVICE DESCRIPTOR WORD#15 


—————————_-- 
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ERROR POINTER TABLE 


| .SBTTL ERROR POINTER TABLE 
| :*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
| t*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
[*LOCATION $ITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 
| 
| 


‘*NGTE1: IF $11EMB 1S 0 THE ONLY PERTINENT DATA IS ($ERRPC) 
; *NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
: EM :POINTS TO THE ERROR MESSAGE 
ie DH ; {POINTS TO THE DATA HEADER 
DT sPOINTS TO THE DATA 
‘ DF + POINTS TO THE DATA FORMAT 
001442 éERRTB: 

1434 001442 0447046 065163 071646 “WORD €M1,DH1,DT1,DF1 sERROR ITEM # 1 
001452 044741 065253 071670 “WORD  &M2.DH2.DT2.DF2 ‘ERROR ITEM # 2 
0014 5005 065346 071712 "WORD &M3,DH3,DT3.DF3 TERROR ITEM # 3 
001472 045052 065437 071712 "WORD £M4.DH4.DT4.DF4 TERROR ITEM # 4 
001502 045112 065533 071734 “WORD EMS, “DHS. DTS.DF5 TERROR ITEM # 5 
001512 045146 065533 071766 "WORD £M6.DH6.DT6.DF6 "FRROR ITEM # 6 
001522 045200 065533 071766 “WORD EM? DH? -DT7_DF7 sERROR ITEM # 7 
001532 045112 065533 071766 "wORD £&M10,DH10,DT10, DF 10 TERROR ITEM # 10 
001542 045233 065533 071766 "WORD  £M11.DH11.DT11.DF11 TERROR ITEM # 11 
001552 000000 072010 "WORD &M12.DH12.D112.DF 12 ‘ERROR ITEM # 12 

62 000000 072076 "WORD £M13.DH13,DT13,DF 13 “ERROR ITEM # 12 
001572 045314 065533 071766 "WORD £M14.DH14.DT14.DF14 “ERROR ITEM # 14 
1602 045437 065533 071766 "WORD £M15.DH15.DT15,DF 15 TERROR ITEM # 15 
001612 045562 065573 072130 "WORD £M16.DH16.DT16.DF 16 “ERROR ITEM # 16 
001622 045633 065653 071712 "WORD £M17.DH17.D117.DF 17 TERROR ITEM # 17 
001632 046 065743 072150 “WORD *DH20,.DT20.DF 20 TERROR ITEM # 20 
1642 046244 065533 072172 "WORD £M21,DH21,DT21.DF 21 TERROR ITEM # 21 
001652 046375 066031 204 "WORD £M22.DH22.DT22,DF 22 TERROR ITEM # 22 
046375 072232 "WORD £&M23.DH23.D123.DF 23 TERROR ITEM # 23 

001672 046375 066224 972254 "WORD £M24,DH24.DT24. TERROR ITEM # 24 
001702 046462 066363 072300 “WORD £M25.DH25.DT25,DF 25 “ERROR ITEM # 25 
OOTZ12 046575 066425 072350 “WORD EM26,DH26,DT26, DF 26 TERROR ITEM # 26 
001722 046575 066425 072424 "WORD &M27.DH27.DT27.DF 27 TERROR ITEM # 2° 
3 000000 072466 "WORD. &M30.DH30.DT30,DF 30 TERROR ITEM # 30 

001742 7046715 066425 072350 "WORD £/#31.DH31.DT31.DF 31 _- .--;ERROR ITEM # 31 
Q01752 .046715 066425 072424 "WORD 2° DH32 DT 32.DF 32 TERROR ITEM # 32 
001762 046763 066513 072520 "WORD £M33,DH33,D733,DF53 TERROR ITEM # 33 
001772 047024 066513 072576 "WORD EM34.DH34,D134 DF 34 TERROR ITEM # 34 
047126. 066513 072576 “WORD £M35,DH35,DT35,DF 35 TERROR ITEM # 35 

002012 047230 066513 072576 "WORD £M36.DH36.DT36, DF 36 TERROR ITEM # 36 
22 047331 066513 072576 "WORD £M37.DH37.D137,DF 37 TERROR ITEM # 37 

32 047432 066513 072520 "WORD £M40.DH40.DT40,DF40 TERROR ITEM # 40 
047603 000000 072650 "WORD £€M41,DH41.D141,DF41 TERROR ITEM # 41 

002052 047 066616 072702 "WORD £M42,DH42,DT42,DF4 TERROR ITEM # 42 
002062 047761 066616 072702 "WORD £M43,DH43,9743,DF4 TERROR ITEM # 43 
002072 050102 000000 072760 "WORD EM44.DH44,D144,DF 44 TERROR ITEM # 44 
002102 050102 966720 073030 "WORD &M45.DH45.DT45,DF45 TERROR ITEM # 45 
002112 050145 066737 073104 "WORD £M46.DH46.D146,DF 46 TERROR ITEM # 46 
002122 050223 20 073172 "WORD €M47.DH47,D147,DF47 TERROR ITEM # 47 
002132 050341 066763 072576 “WORD £M50.DH50,DT50,DF 50 SERROR ITEM # 50 
002142 050437 073224 “WORD 51°DH51.D151.DF 51 TERROR ITEM # 51 
002152 050500 065533 073172 “WORD €M52,DH52,DT52,DF5 TERROR ITEM # 52 
002162 050621 066425 073262 “WORD £M53,DH53,D153.DF5 TERROR ITEM # 53 
002172 051016 067035 073302 "WORD £€M54.DH54.D154.DF 54 TERROR ITEM # 54 
002202 051062 065533 073172 "WORD €M55.DH55.DT55.DF55 TERROR ITEM # 55 


™ 
002212 051203 066425 073262 -WORD &M56,DH56,D156,DF 56 TERROR ITEM # 56 





— —_ re 
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ERROR POINTER TABLE 





“WORD £&M57,DH57,D157.DF 57 sERROR ITEM # 57 

RD  E—M60.DH60.DT60,DF60 “ERROR ITEM # 40 
"WORD £M61,DH61,DT61,DF61 ‘ERROR ITEM # 61 
WORD EM62.DH62.DT62.DF62 ‘ERROR ITEM # 62 
“WORD £M63,DH63,DT63,DF6 ‘ERROR ITEM # 63 
WORD  £M64.DH64.DT64 ,DF64 TERROR ITEM # 64 
WORD &M65.DH65.DT65.DF65 ‘ERROR ITEM # 65 
WORD E&M66,DH66.DT66,DF 66 SERROR ITEM # 66 
“WORD &M67.DH67.D167.DF67 TERROR ITEM # 67 
"WORD €M70.DH70.DT70.DF 70 “ERROR ITEM # 70 
"WORD £M71.DH71.DT71.DF 71 “ERROR ITEM # 71 
WORD €&M72.DH72.DT72.DF 72 SERROR ITEM # 72 
“WORD EM73,DH73,D173,DF73 TERROR ITEM # 73 
"WORD EM74.DH74,D174 DF 74 “ERROR ITEM # 74 
"WORD EM75S.DH75.DT75.DF 75 TERROR ITEM # 75 
"WORD &M76.DH76.DT76.DF 76 ‘ERROR ITEM # 76 
"WORD EM77.DH77.DT77.DF77 TERROR ITEM # 77 
"WORD £M100,DH100,DT100, DF 100 sERROR ITEM # 100 
"WORD £M101.DH101.DT101.DF 101 TERROR ITEM # 1017 
"WORD &M102.DH102.DT102.DF 102 TERROR ITEM # 102 
"WORD £M103.DH103.DT103.DF 103 TERROR ITEM # 103 
“WORD EM104.DH104.DT104.DF104 TERROR ITEM # 104 
"WORD £M105.DH105.DT105.DF 105 SERROR ITEM # 105 
"WORD £M106.DH106.DT106.DF 106 TERROR ITEM # 106 
"WORD £M107.DH107.DT107.DF 107 TERROR ifEM # 107 
"WORD £M110.DH110.DT110.DF110 ‘ERROR ITEM # 110 
"WORD €M111.DH111.DT111.DF111 ERROR ITEM # 111 
"WORD £M112.DH112.DT112.DF112 TERROR ITEM # 112 
"WORD £M113.DH113.DT113.DF113 TERROR ITEM # 113 
"WORD £M114.DH114.DT114.DF114 TERROR ITEM # 114 
"WORD £€M115.DH115.DT115.DF115 TERROR ITEM # 115 
"WORD £M116.DH116.DT116,DF 116 SERROP ITEM # 116 
"WORD £M117.DH117.DT117.DF117 TERROR ITEM # 117 
"WORD £M120.DH120.DT120.DF 120 “ERROR ITEM # 120 
"WORD €M121.DH121.DT121.DF 121 TERROR ITEM # 121 
"WORD £M122.DH122.DT122.DF 122 TERROR ITEM # 122 
"WORD £M123.DH123.DT123.DF 123 TERROR ITEM # 123 
"WORD £M124.DH124.DT124.DF 124 TERROR ITEM # 124 
"WORD £M125.DH125.DT125.DF 125 TERROR ITEM # 125 
"WORD £M126.DH126.DT126.DF 126 TERROR ITEM # 126 
"WORD £M127.DH127.DT127.DF 127 TERROR ITEM # 127 
"WORD £M130.DH130.DT130.DF 130 SERROR ITEM # 130 
"WORD £M131.DH131.DT131.DF131 TERROR ITEM # 131 
"WORD £M132.DH132.DT132.DF 132 TERROR ITEM # 132 
"WORD £M133.DH133.D1T133.DF 133 TERROR ITEM # 133 
"WORD £&M134.DH134.DT134.DF 134 TERROR ITEM # 134 
"WORD £M135.DH135.DT135.DF135 TERROR ITEM # 135 
"WORD £&M136.DH136.DT136,DF 136 SERROR ITEM # 136 
"WORD Mi 37.DH137.D1137.DF 137 TERROR ITEM # 137 
"WORD £M140.DH140.DT140.DF 140 “ERROR ITEM # 140 
"WORD £M141.DH141.DT141.DF 141 TERROR ITEM # 141 
“WORD EM14 -DH142,DI14¢,DF 14g TERROR ITEM # 142 
WORD £M143.DH143.D1143.DF 14 TERROR ITEM # 143 
"WORD £M144.DH144.DT144.DF 144 TERROR ITEM # 144 
"WORD £M145.DH145.D1145.DF 145 TERROR [TEM # 145 
"WORD £M146.DH146.DT146.DF 146 FRROR ITEM # 146 
"WORD £M147.DH147.D1147.DF 147 TERROR ITEM @ 14’ 
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| ERROR POINTER TABLE 
| 003132 057226 070326 073606 .WORD £&M150,DH150,DT150,DF 150 sERROR ITEM # 150 
003142 057226 070136 073660 WORD £€M151.DH151,DT151,DF151 ‘ERROR ITEM # 151 
| 003152 057260 070026 073606 Y EM152,DH152,D1152,DF 152 TERROR ITEM # 152 
1 57260 070136 073660 "WORD £M153.DH153,DT153,DF 153 TERROR ITEM # 153 
| 003172 057312 070417 073700 "WORD £M154.DH154,DT154,DF 154 ‘ERROR ITEM # 154 
003202 057544 070417 073700 “WORD &M155.DH155,DT155,DF 155 TERROR ITEM # 155 
003212 057777 967035 073606 "WORD &M156.DH156,DT156,DF 156 TERROR ITEM # 156 
003222 060214 067035 073606 “WORD £M157.DH157,DT157,DF 157 “ERROR ITEM # 157 
002232 33 067035 073606 “WORD EM160,DH160,DT160,DF 160 TERROR ITEM # 160 
: 003242 060640 067035 073606 "wORD £&M161.DH161,DT161,DF 161 TERROR ITEM # 161 
| 003252 061045 067035 073606 "WORD £M162.DH162.DT162,DF 162 TERROR ITEM # 162 
003262 061112 067035 073606 "WORD £M163,DH163,DT163,DF 163 TERROR ITEM # 163 
003272 061157 065653 071712 "WORD £M164.DH164,DT164 DF 164 TERROR ITEM # 164 
003302 061224 065653 071712 "WORD £M165.DH165,DT165,DF 165 TERROR ITEM # 165 
003312 061271 067035 073606 "WORD £M166.DH166,D1T166,DF 166 TERROR ITEM # 166 
003322 061401 067035 073606 “WORD £&M167.DH167,DT167,DF 167 TERROR ITEM # 167 
003332 061640 067035 073606 "wORD £&M170.DH170,DT170,DF170 TERROR ITEM # 170 
061750 067035 073606 "WORD €M171.DH171,DT171,DF171 TERROR ITEM # 171 
003352 062207 067035 073606 "wORD £&M172.DH172,DT172,DF 172 TERROR ITEM # 172 
3 062446 067035 06 WORD &M173.DH173.D1T173,DF 173 TERROR ITEM # 173 
=03372 062705 067035 073606 “WORD £€M174.DH174,DT174,DF 174 TERROR ITEM # 174 
003402 063144 067035 073606 “WORD £M175.DH175,DT175,DF175 ‘ERROR ITEM # 175 
003412 063403 067035 073606 "WORD £&M176.DH176,D1176,DF 176 TERROR ITEM # 176 
003422 063540 070457 073712 “WORD £&M177.DH177,D1177,DF 177 TERROR ITEM # 177 
003432 063574 067035 073606 “WORD EM200,DH 00, DF 200 [ERROR ITEM # 200 
003442 063731 067035 06 "WORD £M201,DH201,DT201,DF 201 TERROR ITEM # 201 
003452 064066 067035 073606 "WORD. EM202,DH202,DT202.DF 202 ‘ERROR ITEM # 202 
003462 064223 067035 073606 "WORD &M203.DH203,DT203,DF 203 SERROR ITEM # 203 
003472 064360 067035 073606 "WORD £M204,DH204,DT204 DF 204 TERROR ITEM # 204 
C03502 064515 065653 071712 "WORD £M205.DH205,DT205,DF 205 TERROR ITEM # 205 
003512 064562 067035 073606 WORD £&M206,D DF TERROR ITEM # 206 
003522 7 067035 073606 "wORD &M207.DH207,DT207,DF 207 TERROR ITEM # 207 
003532 064751 067035 073606 "WORD £&M210,DH210, “DF210 TERROR ITEM # 210 
3542 045112 070523 073722 "WORD £&M211.DH211,DT211,DF211 TERROR ITEM # 211 
003552 045146 065533 073740 "WORD &M212.DH212,DT212,DFel2 TERROR ITEM # 212 
945200 065533 073740 "WORD £M213.DH213,DT213,DF213 TERROR ITEM # 213 
003572 065026 067035 073606 : T214.DF 214 ‘ERROR ITEM # 214 


WORD £&M214,DH214,D 
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ACT11 HOOKS 


1438 .SBTTL ACT11 HOOKS 
SLR RR ARERR RENEE TERRE EER OR EAE R RAR RERERE ERRATA E EERE RRO E ER OTR ES 
;HOOKS REQUIRED BY ACT11 
003602 $SVPC=. SAVE PC 
000046 .=46 
000046 oes —— 321)SET LOC.46 TO ADDRESS OF $SENDAD IN .$EOP 


000052 000000 «WORD 0 722)SET LOC.52 TO ZERO 
003602 .=$SVPC 2 RESTORE PC 


, iddecthuas 1 ae FIO PRE tar 29 
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APT PARAMETER BLOCK 


| 
| 1440 .SBTTL APT PARAMETER BLOTK 


ESR REE EEE CRRA EERE EEE ERERERERRER EEE 


:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


oa ap ata ing pcg tetera ge ytd ene pt 2 gpa : A peen sat Pn 


003602 ~$X=. SAVE CURRENT LOCATION 

000074 .=24 :SET POWER FAIL TO POINT TO START OF PROGRAM 
C00024 000200 200 :IFOR APT START UP 

000044 -=44 POINT TO APT INDIRECT ADDRESS PNTR. 
000044 003602 $APTHDR ::POINT TO APT HEADER BLOCK 

003602 .=.$X 9 RESET LOCATION COUNTER 


SERRE REET EERE EEE RRR RR E ER RR RE ete 
SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
; INTERFACE SPEC. 


OC $602 $APTHD: 

003602 000000 $HIBTS: .WORD 0 :TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

603606 001316 $MBADR: .WORD $MAIL . ADDRESS OF APT MAILBOX (BITS 0-15) 

003606 000010 $TSTM: .WORD 10 «RUN TIM OF LONGEST TEST 

003610 000040 $PASTM: .WORD 40 ; sRUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

003612 000000 $UNITM: .WORD 0 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
603614 000052 “WORD  $ETEND-$MAIL/2 ::LENGTH MAILBOX=E TABLE (WORDS) 


| 
' 

ate ST 
ea ‘’ ; 
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INITIALIZE THE COMMON TAGS 


3 thy INITIALIZE THE COMMON TAGS 


sari INITIALIZE THE COMMON TAGS 
CLEAR THE COMMON TAGS ($CMTAG) AREA 


442 
1223 003616 


003616 012706 001100 MOV #$CMTAG RO 3:FIRST LOCATION TO BE CLEARED 

003622 005026 CLR (R6) + 3:CLEAR MEMORY LOCATION 

003624 022706 001140 CMP #SWR,R6 ; ;DONE? 

003630 001374 BNE 6 a sf BACK IF NO 

003632 012706 001100 MOV STACK, SP SETUP THE STACK POINTER 
dae A FEW VECTORS 

003636 012737 036170 000020 ASSCOPE ,a#IOTVEC hive VECTOR FOR SCOPE ROUTINE 

003644 012737 000340 000022 MOV #340 ,aM1OTVEC+2 ;:LEVEL 7 

003652 012737 036506 000030 MOV #SERROR , aMEMTVEC EMT VECTOR FOR ERROR ROUTINE 

003660 012737 000340 000032 MOV #340, aMEMTVEC+2 ;:LEVEL 7 

003666 012737 041072 000034 MOV #STRAP ,aMTRAPVEC ;;TRAP_VECTOR FOR TRAP CALLS 

003674 012737 000340 000036 MOV #340, a#TRAPVEC+2;LEVEL 7 

003702 012737 041156 000024 MOV #$PWRDN,@#PWRVEC ; ;POWER FAILURE VECTOR 

003710 012737 000340 000026 MOV #340, a#PWRVEC+2 LEV VEL 7 

003716 013737 035736 035730 MOV SENDCT , SEOPCT SETUP END-OF-PROGRAM COUNTER 

603724 005037 001302 CLR $TIMES zs INITIALIZE NUMBER OF ITERATIONS 

003730 005037 001304 CLR SESCAPE CLEAR THE ESCAPE ON ERROR ADDRESS 

003734 112737 000001 001115 MOVB #1 , SERMAX > :ALLOW ONE ERROR PER TEST 

sINITIALIZE THE “T=BIT'' TRAP vECTOR. THEN LOAD pSCAT IOS, “SRTRN'’, IN 

SETHE "'END-OF =PASS'' (SEOP) ROUTINE, WITH A ‘RTIJ"* OR ‘RIT 

003742 012737 036154 000014 MOV #SRTIRN,AMTBITVEC ::SET ‘T'' BIT VECTOR TO $RTRN 

003750 012737 000340 000016 MOV #340, a#TBITVEC+2 :;LEVEL 7 

003756 012737 000002 036154 MOV ARTI, SRTRN 32SET SRTRN TO A RTI 

003764 012737 004012 000010 MOV #65$.QMRESVEC ::TRY TO DO A RIT 

003772 005046 CLR -(SP) 7; DUMMY PS 

003774 012746 004002 MOV #64$ ,-(SP) i AND PC 

004000 000006 RTT TRY THE RT 

004002 012737 000006 036154 648: MOV ARTT, $RTRN TiRTT IS LEGAL=-SET $RTRN TO A RIT 

004010 000402 BR ae 

004012 062706 000010 65$: ADD #10,SP T ILLEGAL--CLEAN OFF THE STACK 

004016 012737 000012 000010 66$: MOV PRESVEC#2, amesvét, | TRESTORE TRAP CATCHER 

004024 005037 036162 CLR $TBIT CLEAR ‘'T’’ BIT SWITCH 

004030 012737 004030 001106 MOV #., $LPADR TINITIALIZE THE LOOP ADDRESS FOR SCOPE 

004036 012737 004036 001110 MOV #..$LPERR *SETUP THE ERROR LOOP ADDRESS 


:SIZE FOR HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
* TEQUAL TO A ‘'=1"', SETUP FOR A SOFTWARE SWITCH REGISTER. 


004044 013746 000004 MOV @AERRVEC,-(SP) ;;SAVE ERROR VECTOR 

004050 012737 004104 000004 MOV #67$ , AMERRVEC 23SET UP ERROR VECTOR 

004056 012737 177570 001140 MOV #DSWR , SWR SETUP FOR A HARDWARE SWICH REGISTER 

004064 012737 177570 001142 MOV #DDISP DISPLAY : AND A A HARDWARE DISPLAY REGISTER 

004072 022777 177777 175040 CMP #-1, aSWR TRY TO REFERENCE HARDWARE SWR 

004100 001012 BNE 69$ >: BRANCH IF NO TIMEOUT TRAP Oc CumneS 
7:AND THE HARDWARE SWR IS NOT = - 

004102 000403 BR 68$ 7 BRANCH IF NO TIMEOUT 

edt e eons 004112 67$: a3 #68$ , (SP) >:SET UP FOR TRAP RETURN 

004112 012737 000176 001140 68$: MOV #SUREG, SWR z:POINT TO SOFTWARE SWR 

004120 012737 000174 001142 MOV #DISPREG, DISPLAY 

004126 012637 000004 69$: MOV (SP) + ,@#ERRVEC Seog Hy ERROR VECTOR 

004132 005037 001324 CLR $PASS ;CLEAR PASS COUNT 

004136 132737 000200 001337 BITB #APTSIZE,SENVM ::TEST USER SIZE UNDER APT 

004144 001403 BEQ 70$ SYES,USE NON-APT SWITCH 

004146 012737 001340 001140 MOV #$SWREG.SWR INO, USE APT SWITCH REGISTER 


L 


' CKFPACO FP11F FLTG PNT PRT A 
INITIALIZE THE COMMON TAGS 





004154 
1444 


004 300 
1445 0046300 


112737 
600420 


177777 
036110 
004240 
000042 
001336 
001140 


000001 


gE > 
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70$: 
oles TYPE PROGRAM NAME 
give a ncaa OF THE PROGRAM IF FIRST PASS 


a-1 izFIRST TIME? 
BNE 71$ 3 ;BRANCH IF NO 
000042 CMP —* arse 3¢ACT=11? 
7. 71$ Lg age IF YES 
YPE 72$ YPE ASCIZ_ STRING 
.SBITL GET VALUE FOR SOF TWARE suitcH REGISTER 
O42 i cARE W WE RUNNING UNDER XXDP/ACT? 
BNE 73$ ;BRANCH IF YE 
000001 CMPB SENV #1 7 ARE WE RUNNING UNDER APT? 
BEQ 73$ SOF Tua IF YES 
000176 CMP SWR ,ASWREG SOFTWARE SWITCH REG SELECTED? 
BNE 74$ [BRANCH IF NO 
goes 78 SIGET SOF T=SWR SETTINGS 
001134 by MOVB #1 ,$A4UTOB 3:SET AUTO-MODE INDICATOR 
BR 71$ :GET OVER THE ASCIZ 
bier eASCIZ <CRLF>*CKFPACO rPiTF FLTG PNT PRT A*®<CRLF> 
LOOP: 


.—--— - --- -----——_ - ee 
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| TEST # 1 = LDFPS, STFPS AND DATA PATHS TEST 


14664 .SBITL TEST # 1 = LDFPS, STFPS AND DATA PATHS TEST 


° ER REE ER REE EERRERE EEE EEE EERE EERE EE HERE 


D*TEST 1 LDFPS, STFPS AND DATA PATHS TEST 
*® 
eeTHIS IS A TEST OF THE LDFPS (LOAD FLOATING POINT STATUS) AND STFPS 


:*(STORE FLOATING POINT STATUS) INSTRUCTIONS. A COUNT PATTERN IS GENERATED 
**AND RUN THROUGH THE FLOATING POINT STATUS REGISTER, 

‘*THIS WILL TEST THE 16-BIT TRI STATE BUS WHICH CONNECTS.THE CPU 

:*WITH THE FPP AND ALSO RUNS INTERNALLY WITHIN THE FPP. LY DMO AND 

:*SMO ARE USED. ' 

:*NOTE THAT A MASK MUST BE USED BECAUSE SOME OF THE F°S BITS CANNOT 


;*BE SET 


} 

| : Satie: 

| :*ONLY THE FIRST FIVE ERRORS WILL BE REPORTED INDIVIDUALLY. 
>*THIS IS TO PREVENT LOCKING OUT THE COMPLETION OF THE TEST BECAUSE 

| **OF VIRTUALLY ENDLESS NUMBER OF ERRORS. ONLY FIVE INDIVIDUAL ERRORS 


| 
| 
j 
' 


~ 


s*WILL BE REPORTED THEN THE TEST WILL BE COMPLETED AND AN ERROR 
>*SUMMARY GIVEN (SEE NOTE BELOW). 


-* 

‘*NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE LOGICAL ‘AND' AND *OR* 
**OF THE FAILING DATA PATTERNS. THESE CAN BE VERY USEFUL IN DETERMINING 
S*STUCK BITS. {F THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH (SWR13) 
S*OFF, THEN THE USER WILL RECIEVE EACH INDIVIDUAL ERROR MESSAGE PLUS 

:*AN ERROR SUMMARY AT THE END OF THE TEST. INHIBITING ERROR PRINT OUT 
t*WILL INHIBIT ERROR SUMMARY PRINT OUT, EXCEPT IN THE CASE DESCRIBED BELOW. 
:*T0 GET JUST THE ERROR SUMMARY WITH NO INDIVIDUAL ERROR REPORTS, 

s*SET SWITCH REGISTER BIT13 AND SWITCH REGISTER BIT? BOTH ON. 


° RRR ERR ERE EERE AREER ERE ARE REA EAAERREREKRE EERE 


004300 200004 TS11: SCOPE 
1465 004302 305037 004560 CLR AERFLG 
1466 004306 012737 004350 001110 MOV #41,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1467 004314 012700 177777 MOV #-1,R0 ZS INITIALIZE THE COUNT PATTERN, 
1468 004320 012737 004562 000244 MOV #AERR1,FPVECT :SET UP FOR UNABLE TO DECODE 
1469 004326 012737 004574 000010 MOV #AERR2, 10 “FPP INSTRUCTION TRAP TO 244 OR 10. 
1470 004334 005002 CLR R2 :R2 IS THE ‘AND* OF BAD DATA. 
1471 004336 005102 COM R2 
1472 004349 005003 CLR R3 :R3 IS THE 'OR' OF BAD DATA. 
1473 004342 012737 004626 000004 MOV #AERR3, ERRVECT SIF EITHER INSTPICTION 
1474 :FAILS TO GO THROUGH THE 
1475 “CORRECT SRC OR DST MODE AN 
1476 [ODD ADDRESS TRAP WIit OCCUR. 
1477 006350 Al: 
1478 004350 010004 All: MOV RO,R4 
1479 004352 042704 030020 BIC #30020,R4 
1480 004356 170104 LDFPS  R& sTEST INSTRUCTION. 
1482 004360 012701 177777 MOV #-1,R1 
1483 004364 170201 Al2: STFPS RT STEST INSTRUCTION. 
1484 004366 012737 042066 000244 MOV #FPSPUR,FPVECT :SET UP FOR UNEXPECTED TRAPS. 
1485 004374 010004 MOV RO,R4S sMASK OFF UNSETTABLE BITS. 
1486 004376 042704 030020 BIC #30020,R4 
1487 004402 012737 042120 000004 MOV #CPSPUR, ERRVECT 
1488 004410 012737 042136 000010 MOV #CPTWO, 10 
1489 004416 020401 CMP R4,R1 :COMPARE DATA EXPECTED WITH 
1490 [THE DATA READ. 
1491 004420 001002 BNE As ‘IF NOT EQUAL GO REPORT ERROR, 
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TEST # 1 = LDFPS, STFPS AND DATA PATHS TEST 


SEQUENCE 


OTHERWISE DECREMENT COUNT PATTERN 
UNTIL IT IS ZERO. 


;RECORD ERROR. 
;COMPUTE ‘QR' OF FAILING PATTERNS. 
[COMPUTE "AND' OF FAILING PATTERNS. 


3SEE IF MORE THAN 5 ERRORS HAVE 
;OCCURRED. BR IF YES. 

; OTHERWISE 

;REPORT ERROR. 


CONTINUE TESTING. 


SEE IF ANY ERRORS OCCURRED. 
IF NOT GO TO NEXT TEST. 
ZOTHERWISE SEE IF A SUMMARY 
:SHOULD BE TYPED. 


; TYPE ERROR SUMMARY. 


SAVE PC OF TRAP. 


TRAPPED TO 10. 


:DID TRAP OCCUR OF FPP INSTRUCTION? 


It NOT FPP INSTRUCTION THEN 
TREPORT SPURIOUS TRAP TO 10. 


OTHERWISE REPORT IR DECIDE ERROR, 


1492 

1493 004422 077026 A2: S0B RO,Al 
eae 004424 000425 BR AS 

1496 904426 005237 004560 A3: INC AERFLG 

1497 004432 050003 BIS RO,R3 

1498 004434 010005 MOV RO,RS5 
1499 004436 005105 COM RS 
138 004440 040502 BIC R5,R2 
1502. 004442 022737 000005 004560 CMP #5 ,AERFLG 
1503 004450 103412 BLO AOS 
1808 
1506 004452 012737 004350 001236 MOV #A1,$TMP2 
1507 004460 010037 001240 MOV RO, $STMP3 
1508 004464 010137 001242 MOV R1,$7MP4 
1509 004470 010437 001244 MOV R4,$TMPS 
1219 004474 104001 Ad: ERROR +7 
| 
I3\¢ 004476 000751 AOS: fely A2 
1514 004500 005737 004560 AS: TST AERFLG 
1515 004504 001471 BEQ ADONE 
1516 004506 032777 020000 174424 BIT #S5w13,aSwWR 
1517 004514 001404 BEQ A6 
1518 004516 032777 000200 174414 BIT #SwW7,aSWR 
temp 004524 001461 BEQ ADONE 
1521 004526 AG: 
1522 004526 010237 001236 MOV R2.4iMP2 
1523 004532 010337 001240 MOV R3,$TMP3 
1524 004536 012737 004552 001116 MOV #A7 , SERRPC 
1525 004544 112737 000002 001114 MOVB #2,$1TEMB 
1526 004552 004737 041342 A7: JSR PC ,ERTYPE 
LF 44 004556 000444 KR ADONE 
130? 004560 000000 AERFLG: .WORD 0 
1531 ; UNABLE TO PESSOS FPP INSTRUCTION. TRAPPED TO 244. 
1532 004562 011637 001236 AERR1: MOV (SP) ,STMP2 
1533 004566 022626 CMP (SP)+, (SP) + 
1534 004570 104010 1$: FRROR +10 
ee 004572 000436 BR ADONE 
1537 sUNABLE TO DECODE INSTRUCTION. 
1538 004574 021627 004352 AERR2: CMP (SP) ,#A11+2 
1539 004600 001405 BEQ 1$ 
1540 004602 021627 004366 CMP (SP) ,#A12+2 
1541 004606 001402 BEQ 1$ 
1542 004610 000137 042136 JMP CPTWO 
ie 
ie? 004614 011637 001236 1$: MOV (SP) ,STMP2 

1546 004620 022626 CMP (SP)+,(SP)+ 

1547 OMOes 104011 2$: ERROR®* +117 


1548 004624 000421 BR ADONE 
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1549 
1550 
1551 004626 
1552 004632 
1553 oper 


55 004642 
6 


TASS 
wy 
N 


ed a ed a ae ed ed = ed 
e 
oOo 
vw 
ao 
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z 


1564 664 

1565 004666 

1566 

1567 004670 
604670 


1568 
1569 


011637 
022626 
104014 
000404 


011637 
022626 
104015 


104413 


‘he FPI1F FLTG PNT PRT A 
TES 


004352 
Ové 366 
042120 


001236 


001236 


H 3 
MACRO M1113 28=MAR=81 12:56 PAGE 25-2 
# 1 = LDFPS, STFPS AND DATA PATHS TEST 


AERR 


18: 
15$: 


23: 
258%: 


ADONE : 


; TRAP TO 4 
RR3: 


HANDLER 

CMP (SP), MA11+2 

SEQ 1$ 

CMP (SP) ,MAl2+2 

BEO 2$ 

JMP CPSPUR 

MOV (S$?) ,STMP2 

CMP (SP)+,(SP)+ 

ERROR +14 

BR ADONE 

MOV (SP) ,STMP2 
’ CMP (SP)+,(SP)+* 

ERROR +15 

RSE TUP 


‘fF @ + + 


SEQUENCE 


3DID THE TRAP OCCUR ON THE 
SLDFPS INSTRUCTION? 
OR THE STFPS INSTRUCTION? 


yIF NEITHER THEN REPORT 
sUNEXPECTED TRAP TO 4, 


:G0 INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

‘THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH pede (HAS 
3; THE USER TYPED CONTROL G?) 


Gar. wee ae” 


(—- 


ee. 
| CKFPACO FRTTIF FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 26 SEQUENCE 


TEST # 2 = CFCC TEST 
1575 -SBTTL TEST # 2 = CFCC TEST 
SLUR ER AAA RARER RRA E AREA EERE AEE H EERE REE R TEE ERE EERE Re RE REAR e eT 
z*TEST 2 CFCC Test 
+ 
s*THIS IS A TEST OF THE COPY CONDITION CODES INSTRUCTION, CFCC. 
-* 


RRR ARARHR TREE ARERAHARERAARAARAREERARKRERERERRRRRE RRR E 


—tes 


004672 000004 S12: SCOPE 
1576 00467% 012737 004706 001110 MOV #81,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1377 004702 012700 000017 MOV #17_R0 :RO CONTAINS TO TEST PATTERN. 
1579 004706 Bl: 
1380 004706 170100 LDF?Ss)—s RO ZLOAD THE TEST PATTERN 
1582 004710 32: 
1385°004710 170000 CFCC :COPY CONDITION CODES. 
1485 004712 013703 177776 MOV PSw,R3 SEE IF PATTERN TRANSFERED. 
1586 004716 042703 177760 BIC #177760,R3 . 
1587 004722 020003 CMP RO, 83 
1588 004724 001002 RNE BERR 
1550 004726 077011 B3: 508 RO,B1 
1391 004730 000422 BR BDONE 
1593 006732 BERR: 
159 004732 170201 STFPS _R1 :WAS FPS MODIFIED BY CFCC? 
7595 004734 012737 004710 901236 MOV #82,$TMP2 
12S6 004742 020001 CMP RO,R1 
1587 004744 001006 BNE BERR1 
1599 004746 010337 001240 MOV R3,$TMP3 
1690 424752 010037 001242 MOV RO.$TMP4 
04756 104003 1$: ERROR +3 
1602 (04740 600762 BR B3 
1604 004762 BERR1: 
1605 004762 010037 001240 V RO, $TMP3 
? 004766 010137 001242 V R1.$TMP4 
1607 004772 104004 1$: ERROR +4 
1608 004774 000754 BR B3 
1610 004776 BDONE : 
004776 104413 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


1611 


| 
| 
| 
| 


3 
CKFPACO FPIIF FLTG PNT PRT A agg eitis 28-MAR=81 12:56 PAGE 37 SEQUENCE 
TEST #@ 3 = SETF, SETD, SETI AND SETL TES 
1620 .SBITL TEST # 3 = SETF, SETD, SETI AND SETL TEST 
MOTTTTTITITITI TLL TLL Lh 
TEST 3 SETF, SETD, SETI] AND SETL TEST 


TeTHIS 1S A TEST OF THE SETF, SETD, SETI AND SETL INSTRUCTIONS. 
;*EACH JNSTRUCTION IS EXECUTED WITH THE FPS CONTAINING 
S*ALL ONES AND ALSO WITH THE FPS CLEAR. THE RESULT OF EACH 


, :* SITUATION IS CHECKED. 
> SERRE K KERR WREAK EREREREREREEAARHAEREKE SE 
005000 1ST3: SCOPE ‘ 
1621 005002 012737 005016 001110 MOV #C1,$LPERR :SET UP THE LOGR ON ERROR ADRESS. 
| 1622 005010 012737 000760 001244 MOV #760,$TMP5 
1623 005016 012737 000202 001250 (C1: MOV #202,$TMP7 
1624 005024 01237 043231 001252 MOV #SETF1,$TMP10 
1605 005032 905000 CLR RO 
1627 005034 170100 LDFPS RO ZCLEAR THE FPS. 
1628 005036 012737 005044 001236 MOV #C15,$TMP2 
1630 005044 170001 (15: SETF sTEST INSTRUCTION. 
1632 005046 170201 STFPS R1 :GET RESULT. 
1633 905050 005002 CLR R2 
1634 005052 020201 CMP R2,R1 :DID AN ERROR OCCUR? 
1635 005054 001402 BEQ 1$ 
1636 005056 004757 0054/76 JSR PC, CERR1 
1638 005062 1$: 
005062 012737 005070 001110 MOV #C2,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1659 005070 012700 147757 C2: MOV #147757,R0 
1641 005074 170100 LDFPS RO sPUT 147757 IS FPS 
1642 005076 012737 005104 001236 MOV #025, $TMP2 
1645 005104 170001 C25: SETF :CLEAR FD BIT. 
1645 005106 170201 STEPS RI :GET RESULT 
1646 005110 012702 147557 MOV #147557,R2 
1647 005114 020102 ; CMP R1,R2 :RESULT CORRECT. 
1648 005116 001402 REO 1$ 
1649 005120 004737 005574 JSR PC, CERR2 
1651 005124 | 1$: 
005124 012737 005132 001110 MOV #C3,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1652 0051382 012737 000203 001250 C2: MOV #203, $1MP7 
1653 005140 012737 043237 001252 MOV #SETD1.$TMP10 
1654 005146 012700 147757 MOV #147757,R0 
1656 005152 170100 LDFPS = RO :LOAD 147/57 INTO FPS. 
16°” 005154 012737 005162 001236 MOV #35, $TMP2 
1658 005162 170011 (35: SETD sSETD FD BIT. 
1660 005164 170201 STEPS) RI 
1661 005166 012702 147757 MOV #147757,R2 
1662 005172 020102 CMP R1,R2 sRESULT CORRECT? 
1663 005174 901402 BEQ 1 
1664 005176 004737 005574 JSR PC, CERR2 
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ea ere 


| CKFPACO FPI1F FLTG PNT 
TEST # 3 = SETF, SETD, 


012737 
5 


005000 
170100 
012737 


170011 
170201 


170100 
012737 


170002 
170201 
00 


012737 
170002 
170201 


170201 





PRT A 
SETI AND 
005210 


005222 


005476 


005322 
147757 
005336 
147657 
005574 
005 364 
000205 
043253 
147757 
005414 


eS 
MACRO M1115 28-MAR=81 12:56 PAGE 27-1 


SETL TEST 
i$: 
901110 MOV #C4,$LPERR 
C4: CLR RO 
LDFPS RO 
001236 MOV #C45,$TMP2 
(45: SETD 
STFPS 1 
MOV #200 ,R2 
CMP R1,R2 
BEQ 1$ 
JSR PC,CERR1 
1$: 
001110 MOV #C5,$LPERR 
001250 C5: MOV #204,$TMP7 
001252 MOV #SETI1,$TMP10 
CLR RO 
LDFPS RO 
001236 V #55, $TMP2 
(55: SETI 
STFPS RI 
CLR R2 
CMP R2,R1 
bEQ 1$ 
JSR PC, CERR1 
1$: 
001110 MOV #C6,$LPERR 
C6: MOV #147757,RO 
LDFPS RO 
001236 MOV #(65,STMP2 
C65: SETI 
STFPS RI 
MOV #147657,R2 
CMP R1,R2 
BEO 1$ 
JSR PC, CERR2 
1$: 
001110 MOV #C7,$LPERR 
001250 C7 MOV #205, $1MP7 
001252 MOV #SETL1,$1MP10 
V #147757,R0 
LDFPS RO 
001236 V #C75,$TMP2 
C75: SETL 
STFPS RI 


SEQUENCE 


SET UP THE LOOP ON ERROR ADDRESS. 
; CLEAR FPS. 


SET FD BIT. 
GET RESULT. 
sRESULT CORRECT? 


;SET UP THE LOOP ON ERROR ADDRESS. 


sCLEAR FPS 


CLEAR FL BIT. 
3;GET RESULT. 
RESULT CORRECT? 


:SET UP THE LOOP ON ERROR ADDRESS. 
PUT 147757 INTO FPS 


;CLEAR FL BIT. 
GET THE RESULT. 
RESULT CORRECT? 


SET UP THE LOOP ON ERROR ADDRESS. 


SET FPS TO 147757, 


SET FL BIT. 
GET THE RESULT. 
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TEST # 3 = SETF, 


1772 
1773 005624 





CKFPACO FP11F FLTG PNT PR 


SETD, 
012702 


012737 
005000 
170100 
012737 


170012 
170201 


022703 
001774 
032703 
00177° 


032703 


010103 
005103 


032703 
001401 
000443 
032703 
001774 
032701 
001771 
032701 


8 
SETI AND SETL TEST 


147757 


005574 


005442 


005454 


000100 


005476 


177477 


000300 


2 
MACRO M1113 28-MAR-81 12:56 PAGE 27-2 


001110 


001236 


001254 
001246 


Oo 
8s 


91254 


246 


MOV #147757,R2 


CMP R1,R2 

BEQ 

JSR PC, CERR2 
1$: 

MOV ACB, $LPERR 
C8: CLR RO 

LDFPS RO 

MOV #(35,$TMP2 
C85: SETL 

STFPS R1 

MOV #100,R2 

CMP R1,Re 

BEQ 1$ 

JSR PC,CERR1 
1$: BR CDONE 


; THE SE ARF ERROR ANALYSIS ROUTINES: 
CERR1: MOV 
BIT #177477,R3 

2$ 


BEQ 
1$: BR CERRS 
23: CMP #300,R3 
BEQ 1$ 
BIT #300.R3 
BEQ 1$ 
BIT #200,R3 
BEQ 


MOV #SETD1,$1MP11 
MOV #203, $TMP6 


BR CERRS 
3$: BIT #100,R3 
BEQ 1 


q 
MOV #SETL1,$TMP11 
MOV #205, $TMP6 
CERRS 


BR 

CERR2: MOV R1,R3 
COM R3 
BIT #177477 ,R3 
PEQ 2$ 

1$ BR CERR4 

2$ BIT #300,R3 
BEQ 1$ 
BIT #300,R1 
BEQ 1$ 


BIT #200,R1 


;SET UP 


SEQUENCE 37 


RESULT CORRECT? 


THE LOOP ON ERROR ADDRESS. 
;CLEAR FPS. 


;SET FL BIT. 


;RESULT CORRECT. 


zARE ANY OTHER BITS SET? 


;ARE BOTH FD AND FL SET? 
ARE THEY BOTH CLEAR? 


31S FD SET? 


zIS Fi SET 


zARE ANY OTHER BITS SET? 


;ARE BOTH FD AND FL SET? 
zARE THEY 80TH CLEAR? 


71S FD CLEAR? 





| CKFPACO FP1IF FLTG PNT 


TEST # 3 = SETF, 


1774 005630 


Bae 


al ~~ ee ee ee ed ed a ed 
S BBIIIIIBIIIZaassagasas ys 
WhO OON oo 
88 8888s 
ViWFF WWMUIUIV 
NN NNANNO 
ahah aba ~N 
aa NOFSS 


83 005672 


NNN NAS 
S URAR 
. 
g 


SETD, 
001007 


012737 
012737 
060412 


032701 
001354 


PRT 


043231 
000202 


001254 
001246 
006100 


043245 001254 
900204 001246 


3$: 


< M 3 
a MACRO M1113 28-MAR=81 12:56 PAGE 27-3 
ScTI AND SETL TEST 


SEQUENCE 


BNE 3$ 

MOV wSETF -STMP11 
MOV #202 MP6 
BR tims 

BIT #100,81 

BNE i$ sIS FL CLEAR. 
MOV #SETI1,$TMP11 
MOV 04,$TMP6 
BR CERRS 

THE ERRORS: 

MOV R1,$TMP3 

MOV R2.$TMP4 

MOV (SP) +, CPC 
ERROR +12 

JMP acPc 

MOV R1,$TMP3 

MOV R2,$TMP4 

MOV (SP) +, CPC 
ERROR +13 

JMP acPc 

.WORD 0 

RSETUP 


3GO INITIALIZE THF SS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH — (HAS 
; THE USER TYPED CONTROL G?) 


38 
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3 
CKFPACO FPTTIF FLIG PNT PRT A MACRO idee » sett tasiliel 12:56 PAGE Ne 
TEST # 4 = ILLEGAL FPP OP CODES AND STST T 


SEQUENCE 


1824 .SBITL TEST # 4 = ILLEGAL FPP OP CODES AND STST TEST 
FF ARAAARAAAAAAARARRARAAAERAERARERYAARAARARRAARAARARARRARARERAEREHERE 
S*TEST 4 ILLEGAL FPP OP CODES AND STST TEST 
* 
‘THIS IS A TEST OF THE FPP OPERATION CODES: 
te 170003 
se 170004 
** $ 
i 170010 
3* 170013 
:* 170014 
** : 
te 170077 
S*THESE ARE ILLEGAL INSTRUCTIONS AND (WITH INTERRUPTS ENABLED) 
t*SHOULD CAUSE A TRAP TO 2 
; *ALSO TESTED HERE 1S THE INSTRUCT ION: 
‘WHICH SHOULD PUT THE FEC CODE 2 IN R1, AFTER ANY OF THE ABOVE 
:*OP CODES IS EXECUTED. 
7 
Ecce iti it iti tt titi itt t iti i tt ii iti t ttt i iti titi iii t it eet itt i ii 
005744 TST4: SCOPE 
1825 005746 012737 005774 001110 MOV aD1 SLPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
1826 005754 012705 170003 MOV #170003,R5 sINITIAL OP CODE. 
1827 005760 012737 006164 000004 MO’ ADERR2, ERRVECT 
1828 005766 012737 006070 000244 MOV #DERR1FPVECT 
1830 005774 005 D1: CLR RO. 
1831 005776 170100 LDFPS RO ZCLEAR FPS. 
1832 006000 005002 . CLR R2 
1833 006002 010537 006020 MOV RS D2 :SET UP THE ILLEGAL INSTRUCTION. 
006006 010537 001244 MOV RS. $TMPS 
1835 006012 012737 020 001236 MOV #D2,$TMP2 
1836 000.920 D2: . 0 
1837 006U22 170000 D3: CFCC 
1838 006024 005202 INC R2 
1839 006026 005202 Ds: INC R2 
1841 006030 170201 STFPS R1 sREPORT FAILURE. DID NOT TRAP. 
1842 006032 010137 001240 MOV R1,$TMP3 
1843 006036 104016 1$ ERROR +16 
1845 006040 022705 170010 DS CMP #170010,R5 : COMPUTE NEXT OP CODE 
1846 006044 001003 BNE D 
006046 012705 170013 MOV #170013,R5 
1848 006052 000750 BR 51 
1850 006054 022705 170077 D6 CMP #170077,R5 
1851 006060 001001 BNE D7 
1852 006062 000452 BR DDONE 
1853 006064 005205 D7 INC R5 
1854 006066 000742 BR D1 
1856 006070 022716 006022 DERR1: CMP #03, (SP) ;DID ‘TRAP OCCUR ON TEST INSTRUCTION? 
1857 006074 001402 BEOQ 1$ 
1858 006076 000137 042066 JMP FPSPUR 





[-———_-——— -- — 


B 4 
CKFPACO FPI11F FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 28-1 SEQUENCE 40 
TEST # 4 = ILLEGAL FPP OP CODES AND STST TEST 
1860 006102 022626 1$: CMP (SP)+,(SP)+ 
1861 006104 170201 STFPS R1 ;GET THE FPS AND SEE IF IT IS 
1862 006106 022701 100000 CMP #100000,R1 =SET CORRECTLY. 
1865 006112 001406 BEQ 3$ 
1865 006114 012737 100000 001240 MOV #100000, $TMP3 
1866 006122 010137 001242 MOV R1,$TMP4 
1867 006126 104017 28: ERROR +17 
1869 006130 012704 000001 3$: MOV #1,RG 
1870 006134 1703 Da: STST RG ;GET THE FEC CODE. NOTE THAT 
1871 ;IF THE DESTINATION MODE IS 
1872 : IMPROPERLY DECODED AN ODD 
1873 ;ADDRESS TRAP TO 4 SHOULD OCCUR. 
1874 006136 022704 000002 CMP #2.,R4 sWAS FEC CORRECT? 
1875 006142 001001 BNE D9 
1876 006144 000735 BR D5 
1878 006146 D9: sREPORT STST FAILURE 
1879 006146 012737 006134 001240 MOV #D8,$TMP3 
1880 006154 010437 001242 MOV R4,$TMP4 
1881 006160 104020 1$: ERROR +20 
1882 006162 000726 BR D5 
' 
1884 006164 022716 006136 DERR2: CMP #D8+2, (SP) sDID THE TRAP OCCUR ON THE 
1885 006170 001402 BEQ D10 :STST INSTRUCTION? 
1886 006172 000137 042120 JMP CPSPUR 
1888 006176 p10 
1889 006176 011637 001236 MOV (SP) ,STMP2 
1890 006202 022626 CMP (SP)+, (SP) + 
1891 006204 104021 1$: ERROR +21 
1892 006206 000714 : BR D5 
1894 006210 DDONE : 
006210 104413 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 
.. [THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
: THE USER TYPED CONTROL G?). 
1895 
1896 


—_— —- A» 
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C 4 
MACRO M1113 28-MAR=-81 12:56 PAGE 29 


SEQUENCE 41 


TEST #5 = FID, INTERRUPT DISABLE, BIT TEST 
1904 .SBTTL TEST # 5 = FID, INTERRUPT DISABLE, BIT TEST 
| REE Keekenkekeeekeeeeeeeeens eee Reeeeaeeeaeanes STEAREKREREREERETEARE 
| z*TEST 5 FID, INTERRUPT DISABLE, BIT TEST 
‘ STHIS IS A TEST OF FPS BIT 14 (FID) OR FLOATING INTERRUPT DISABLE. 
AN ILLEGAL INSTRUCTION IS EXECUTED WITH FID=1. NC INTERRUPT SHOULD 
** ° 
WOPITTTTTTTTTTTITTTET ITT tee 
006212 000004 TST5: SCOPE 
1905 006214 012737 006230 001110 MOV #£1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1906 006222 012737 006324 000244 MOV MEERR2, FPVECT :SETUP FOR THE INTERRUPT. 
1908 006230 012700 040000 E1: MOV #40000,R0 
1909 006234 170100 LDFPS RO :SET FID. 
1910 006236 012737 006254 001236 MOV #E3,STMP2 
1911 006244 E2: 
1912 006244 170020 E3: .WORD 170020 SILLEGAL FPP INSTRUCTION. 
1915 006246 170000 £4: CFCC : 
1915 006250 170201 STFPS RI :SEE IF ERROR WAS DETECTED. 
1916 006252 022701 140000 CMP #140000,R1 
1917 006256 001005 BNE EERRO 
1919 006260 170304 STST 6 sSEE IF FEC=2 
1920 006262 022704 000002 CMP #2,R4 
1921 006266 001010 BNE FERRI 
1982 006270 000431 BR EDONE 
1924 006272 EERRO: ;REPORT FPS INCORRECTLY SET. 
1925 006272 010137 001240 MOV R1,$TMP3 
1926 006276 012737 140000 001242 MOV #140000, $TMP4 
1927 006304 104022 1$: ERROR +22 
1928 006306 000422 BR EDONE 
1930 006310 EERR1: :REPORT FEC NOT 2. 
1931 006310 010537 001240 MOV R5,$ITMP3 
1932 006314 010437 001242 MOV R4.$TMP4 
1933 0063c0 104023 1$: ERROR +23 
1934 006322 000414 | BR EDONE 
1936 006324 021627 006246 FERR2: CMP (SP) ,#E4 :DID THE ILLEGAL INSTRUCTION TRAP? 
1937 006330 001402 BEQ 1$ 
1938 00633- 000137 042066 JMP FPSPUR 
1940 006336 1$: 
1941 006336 011637 001236 MOV (SP) ,$TMP2 
1942 006342 022626 MP (SP)+, (SP) + 
1943 006344 170201 STFPS 1 
1944 006346 010137 001240 R1,$TMP3 
1945 006352 104024 2$ ERROR +264 
1947 006354 EDONE : 
006354 104413 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 
My: DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER ‘HAS 


—— 


' 
| 


ee 
= 
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TEST #@ 5 = FID, INTERRUPT DISABLE, BIT TEST 


THE USER TYPED CONTRCL G?). 


SEQUENCE 


42 


eee aaa 


t—— --- 


CKFPACO FPT1F FLTG PNT PRT A 
TEST # 6 = LDD AND STD, WITH SRC AND DST MODE 1, T 


1962 


2000 

2001 006516 
2002 006520 
2003 006524 


2 
2737 
0 


012705 


012221 
077302 


012700 
012737 


005003 
172410 


000137 
077305 


170201 
022701 
001402 


006360 
0064 36 


010174 
010240 
000010 


010204 
007660 


010204 
007024 
000002 
007122 


010174 
010240 
000010 


MACRO M1113 hah 12:56 °4GE 5 * 


001110 
001236 


900004 


.SBTTL 


TEST # 6 = 1 DD AND STD, WITH SRC AND DST MODE 7, 


SEQUENCE 


TEST 


REAR ERERAEAAREERAARE EE SERA ERAAARAREAERERHEHEHEER EKER HAE 


 *TEST 6 


LDD 
: AND THE anu we 


ACO, (RO) 
“ eMOST OF THE FAILURES ARE ISOLATED TC THE SRC OR DST FLOwS. 
t*THAT THE INTEGRI7Y OF ACO HAS NOT BEEN ASSURED. 


LDD AND STD, WITH SRC AND DST MODE 1, 
:*THIS IS A TEST OF aig ty pee dace 


TEST 


NOTE — 
THIS MEANS THAT 


‘*IN SOME CASES IT WILL BE IMPOSSIBLE TO ISOLATE CERTAIN DATA PATTERN 
; *FAILURES TO EITHER THE FLOWS OR THIS ACCUMULATOR. 


. 
kd - ndeucennenecensnenecnceqcsuaneeceuntecesseesetserseewtesanenene 


TST6: SCOPE 

Fl: 
MOV #F1,$LPERR 
MOV #F3,$TMP2 
CLR RO 
LDFPS RO 
SETD 
MOV #FDATIO,R1 
MOV #FXDATO,R2 
MOV #10,R3 

Fe: MOV (R2)+,(R1)+ 
$0B R3.F2 
MOV #FDATI4,RO 
MOV #FERR20,ERRVECT 
CLR R3 

F3 LDD (RO) ,ACO 

F4 INC R3 
INC R3 
CMP RO, AFDATIS 
BEQ 
JMP FERR1 

F5 CMP R3,42 
BEQ 1$ 
JMP FERR2 

1$ MOV #FDATIO,R1 
MOV #FXDATO,R2 
MOV #10,R3 

2$ CMP (R1)+,(R2)+ 
BEQ 3$ 
JMP FERRO 

3$ S0B R3,2$% 
STFPS R1 
CMP #200,R1 
BEQ Fé 





SET UP THE LOOP ON ERROR ADDRESS. 


SET UP THE LOAD DATA. 


SETUP RO FOR THE LDD (RO) ,ACO. 
zaf THE SRC FLOWS FAIL THEN 
[AN ODD ADDRESS MAY OCCUR. 


sWAS RO AFFECTED? 


7SEE IF THE PC WAS ADVERSELY 
TAFFECTED DURING THE INSTRUCTION. 


MAKE SURE THE SOURCE DATA WAS 
=NOT AFFECTED. 


MAKE SURE THE FPS IS CORRECT. 


43 


| CKFPACO FPI11F FLTG PNT PRT A 


| 
| 
' 
| 


2058 
2059 006726 


000137 


174010 
005203 
005203 
020027 
oS 


020327 


012701 
012702 


022122 
001402 
000137 


022122 


022122 
001402 
000137 
022122 
001402 
000137 
022122 
00140¢ 


022122 


007640 


006540 
006602 


177777 
000010 
010216 


010226 
010026 


010226 . 


007162 
000002 
007154 


010216 
010240 


007260 
007260 
007260 
007260 
007604 


007314 


4 
MACRO M1113 he 12:56 PAGE Sot 
TEST # 6 = LDD AND STD, WITH SRC AND DST MODE 1, TEST 


001 
001 


mw 
Ww 
ao 


000004 


man 


Fé: 
1$: 


F7: 


Fl2: 


F135: 


F13: 


F1G: 


F15: 


F.16: 


F17: 


F20: 


JMP 


FERR11 


#1$,$  PERR 
#F10,$TMP2 


#-1,R3 
#10,R4 
#FDATOO,R5S 
R3,(R5)+ 
R4,F7 


#FDATO4,RO 


MFERR25S ,ERRVECT 


R3 

ACO, (RO) 
R3 

R3 

RO ,AFDATO4 
Fle 

FERR3 


#FDATOO,R1 
#FXDATO,R2 


(R1)+,(R2)+ 
F13 

FERRS 
(R1)+,(R2)+ 
F14 

FERRS 
(R1)+*,(R2)+ 
F15 

FERRS 
(R1)+,(R2)+ 
F1 

FERRS 
(R1)+,(R2)+ 
F17 

FERR10 
(R1) +, (R2)+ 
F 

FERR6 
(R1)¢,(R2)¢ 


SEQUENCE 


3SET UP THE LOOP ON ERROR ADDRESS. 


SET UP THE OUTPUT DATA BUFFER. 


SET UP RO FOR DST MODE 7 REG O. 
z1F THE DST FLOWS FAIL AN ODD 
ADDRESS COULD OCCUR. 


Zz TEST INSTRUCTION. 


zWAS RO MODIFIED? 


WAS THE PC AFFECTED CORRECTLY? 


7SEE IF THE DATA WAS OUTPUT 
3TO THE TARGET AREA JRRECTLY. 
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CKFPACO FRTIE FLTG PNT PRT & 
TEST # 6 = LDD AND STD, WITH SRC AND DST MODE 1, T 


2060 
2061 


3068 


Law) 
oO 
N 
= 


gee9 32 


-_s 


NOPSMPOFE POM PEPIN NPUNININAN 
ee a at et tt ot 
tuted Oud ad ad OoOoOoo;ooOo°or, 
Ane Ae =O SRURARAN-S 


a 


00140 
00013 


022122 


012737 
012737 
022700 


001004 
012737 
000412 


022700 
001004 
012737 
000403 


607450 
007604 


000200 


007640 
010260 


010250 


010260 
010204 


010174 
000324 


010214 
000322 


010260 


010260 
006440 
001242 
000004 


001240 
010260 


006604. 


MACRO M1113 iy 12:56 PAGE $0-3 


001246 


001242 


001244 
001250 


001246 


001246 


F2l: 


FERRI: 


FERRG: 


BEQ 
JMP 


F217 

FERR7 
(R1)+#,(R2)+ 
F 
FERRI0 - 
R1 

R1 

#200,R1 

F23 

FERR11 

F DONE 


#FXDATO, $TMP3 
#F XDATO+#12,2TMP4 
#FDATIO,$STMPS 
#FDATIO+12,$TMP6 


+25 

F DONE 

#FDATIG, $STMP4 
RO, $TMP3 
#762, $TMPS 
#321. $TMP7 
tala RO 


#32, ~STMP6 


#—DATI4+10,R0 
#322, $TMP6 
4$ 


+27 
F DONE 


+26 
F DONE 
#F4,R1 
R1,$TMP4 
#4 ,R1 

R3 

R3,R1 
R1,$TMP3 
+36 

F DONE 


#F11,R° 
FER2 


SEQUENCE 


sMAKE SURE FPS IS CORRET. 


;SOURCE DATA AFFECTED BY 
THE LDD INSTRUCTION. 


ZFSRC FLOWS FAILURE. ‘ 


sFSRC MODE 4? 


sFSRC MODE 2? 


s THE PC WAS INCORRECTLY AFFECTED 
DURING THE INSTRUCTION. 


45 


——$_—_— — - ee 
SS — 


H 4 
CKFPACO FRTIF FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 30-3 SEQUENCE 
_ TEST # 6 = LDD AND STD, Wlim SRC AND DST MODE 1, TEST 


2117 

2178 007162 012737 010226 001242 FERR3: MOV #FDATOG,STMPG SFAILURE IN THE FDST FL ws. 
2119 007170 010037 001240 MOV RO, $TMP% 

2120 007174 012737 000527 001244 MOV #527,$1MP5 

e121 907202 012737 000641 001250 MOV #641.$TMP7 

$158 007210 022700 010216 CMP #F DATOO,RO :DST MODE 4? 

2126 907214 1004 BNE 1$ 

2125 007216 012737 000644 001246 MOV #644 ,$TMP6 

2126 007226 490612 __BR 4$ 

2128 007226 022700 010236 1$: CMP #FDATOS+10,RO :DST MODE 2? 

2129 0072382 001004 BNE 2$ 

2130 007234 012737 000642 001246 MOV #642,$7MP6 

213) 007242 000403 BR 4$ 

2133 007244 2$: 

2134 007244 104032 3$: ERROR +32 

e135 0072466 000137 010260 JMP F DONE 

2137 007252 4$: 

2738 007252 104031 S$: ERROR +31 

2139 007254 000137 010260 JMP F DONE 

2141 007260 FERRS: sFAILURE OF STD. 

2142 007760 010037 001240 MOV RO, $TMP3 

2143 007.64 012737 910216 001242 MOV #F DATOO,£7MP4 

2144 00727 012737 010234 001244 MOV #FDATO7,$SIMPS 

2145 007300 012737 01024C 001244 MOV #F XDATO. $TMP6 

2146 007306 104033 1$: ERROR +33 

e147 007310 000137 010260 JMP F DONE 

2149 007314 012701 010230 FERR6: MOV #FDATOS,R1 sDID (BUT GR7) FAIL IN THE FDST 
2150 007320 012702 177777 MOV #-) .R2 FLOWS? 

2151 007324 012703 000003 MO\ #3,R3 

2152 007330 020221 1$: CMP R2.(R1)¢ 

2153 007332 001017 BNE 

2194 007334 077303 SOB R3,1$ 

2156 ;REPORT FAILURE OF (BUT GR7) IN 
2157 007336 010037 001240 MOV RO, $TMP3 [THE FDST FLOWS. 

2158 007342 012737 000412 001244 MOV #452, $1MP5 . 

2159 007350 012737 000147 001246 MOV #147. $TMP6 

2160 007356 012737 000145 001250 MOV a145.$TMP? 

2161 007364 104034 2$: ERROR +34 

e162 007366 000137 010260 JMP F DONE 

2164 007372 012701 010230 5$: MOV #FDATO5,R1 :DID (BUT GR7) FAIL IN THE SRC FLOWS? 
2165 007376 012703 000003 MOV #3,R3 

2166 007402 005721 6$: TST (RI )* 

2167 007404 001402 BEQ "$ 

2168 407406 000137 007604 IMP FERR10 

si¢° 007412 077305 7%: SOB R3,6$% 

2171 :REPORT FAILURE GF (BUT GR7) IN 
2172 007414 010037 001240 MOV RO, $TMP “THE FSRC FLOWS. 

2173 007420 012737 000207 001244 MOV #207, $1MP5 


- 


_ CeFPACO FPTIF FLTG PNT PRT A 


NNN nn sss reser es - 


222 04 
$555 007712 


2174 007426 
2175 007434 
2176 

2177 007442 
2178 007444 


MNMNeM NINN NNAEPENNonre nents 
me as et nn dd ot ot es Ho 
BLRARAVLESSLPALATLESS 

8 é 

“N 

* 

N 

Nm 


2199 007542 


2206 007554 





012737 
012737 


104035 
000137 


012701 


000176 
000174 
010260 
016232 


177777 
000002 


010260 
010232 
000002 


007604 


I 
MACRO M1113 28=MAR=81 12:56 PAGE 0-4 
‘EST # 6 = LDD AND STD, WITH SRC AND DST MODE 7, TEST 


001246 
001250 


001244 
001246 
001250 


001242 
001244 
001246 


10$: 


FERR10: 


1$: 


FERR11: 


1$: 


FERR20: 


#176, $1TMP6 
#174,$1TMP7 


+35 
F DONE 


#F DATO6,R1 
Re 


RO, STMPS 
#707,$TMP5S 
#244 ,$TMP6 
#245, 97MP7 
+36 

F DONE 


#F DATO6,R1 
2.R3 


(R1)+ 
7$ 
FERR10 
R3,6$ 


RO,STMP3 


#77, $1MP7 
+37 
F DONE 


AD, STMP3 

MF DATOS, STMPS 
MFDATOZ, STMPS 
#FXDATA,STMP6 
+40 

F DONE 


R1,$7TMP3 
#200, S$TMPS 
+41 


F DONE 
#NULL ,STMP1S 
$T 


MP10 
(SP), $TMP2 
#FDATIG, STMP3 
#321, $TMP7 
#762. $TMPS 


SEQUENCE 


:DiD (BUT FD) FAIL IN THE FDST FLOWS? 


sREPORT FAILURE OF (BUT FD) IN THE 
sFDST FLOWS. 


sDID (BUT FD) FAs. IN THE FSRC FLOWS? 


ZREPORT FAILURE OF (BUT FD) IN THE 
~FSRC FLOWS. 


sREPORT DATA ERROR. 


sREPORT BAD FPS. 


THE EXECUTION OF THE LDD 

; CAUSED &A TRAP TO 4, BECAUSE 
7A FSRC FLOW FAILURE RESULTED 
iN AN ODD ADDRESS. 


47 


— s/s est. tte 


----- 


CKFPACO FPI1F FLTG PNT PRT A 
TEST # 6 = LDD ) 


2231 007720 
2232 007724 


2254 007726 
2275 007732 
2256 


2237 

2238 067734 
6239 007742 
2240 907744 
2241 0077-5 


2c+2 
2243 007750 
2e +4 007754 
Bie 2 007756 
3523 007762 
2248 007762 
2249 007770 
2250 007772 
2251 007774 


2252 
2253 007776 
2254 


2264 010046 
2265 010052 
2266 010060 
2267 

2268 010066 
2269 010072 
2270 

2271 010074 


2272 010100 
2273 

2274 

2275 010102 
2276 010110 
2277 010112 
2278 010114 
2279 

2280 010716 
2281 010122 
2282 010124 
283 

2284 010130 
2285 010130 
2286 010136 
2287 010140 


See ee 


021627 006442 CMP 
001424 BEQ 
020027 010202 CMP 
001006 BNE 
012737 000325 001246 MOV 
022626 CMP 
104042 1$ ERROR 
000544 
020027 01020« 2$: CMP 
001402 BECO 
000177 042120 JMP 
3$: 
012737 000323 001246 MOV 
022626 : CMP 
104042 4$: ERROR 
000531 BR 
022626 FERR21: CMP 
U12737 044035 001264 MOV 
012737 000326 001246 MOV 
012737 000327 001252 MOV 
104042 1$: ERROR 
000515 BR 
012737 042271 001264 FERR25: MOV 
005037 001252 CLR 
012737 010226 001240 MOV 
011637 001236 MOV 
012737 000527 001244 MOV 
012737 0006471 001250 MOV 
021627 006604 CMP 
001424 BEQ 
020027 010224 CMP 
001006 BNE 
012737 000645 001246 MOV 
02262¢ CMP 
104043 1$: ERROR 
000461 BR 
27 010230 es: CMP 
001402 BEG 
000137 0421290 JMP 
3$: 
017737 000643 001246 MOV 
02<626 CMP 
043 4$: ERROR 


MACRO M1113 28-MAR=81 12:56 PAGE 40-8 
AND STD, WITH SRC AND DST MODE 1, TEST 


(SP) wk 442 
FERRO} 


RO, #FDATI3 
2$ 


#325, $TMP6 
(SP)+,(SP)+ 
+42 

F DONE 


RO,AFDATIS 
CPSPUR 


#323, STMP6 
(SP) +,(SP)+ 
+42 

F DONE 


(SP)+,(SP)+ 


#MS16,$TMP15 
#326, $TMP6 
#327, $1MP10 


#NULL ,$TMP15 
$TMP10 


#F DATOS ,STMP3 
(SP) ,$TMP2 
#527, $TMP5S 
#641,$TMP7 


(SP) ,#F10+2 
FERR26 


RO, AF DATOS 
2$ 


#645, $TMP6 
(SP)+,(SP)+ 
+43 

F DONE 


RO, F DATOS 
3$ 

CPSPUR 
#643, $TMP6 


(SP) +, (SP)¢ 
+43 


SEQUENCE 48 
SEE IF FSRC MODE 6 OR 7 WAS 
EXECUTED. 
zFSRC MODE 5? 
REPORT FSRC FLOW FAILURE TO 


zFSRC MODE 3? 


REPORT FSRC FLOW FAILURE TO 
MODE 3. 


REPORT FSRC FLOW FAILURE TO 
MODE 6 OR MODE 7. 


:THE EXECUTION OF THE STD INSTRUCTION 
“TRAPPED TO 4, BECAUSE A FAILURE 

‘IN THE FDST FLOWS RESULTED 

[IN AN ODD ADDRESS. 


zFLOW FAILURE TO FDST MODE 6 OR 7? 
DID FDST FLOW FAIL TO MODE 5? 


REPORT FLOW FAILURE TO FDST 
MODE 5. 


DID FDST FLOW FAIL TO MODE 3? 


:REPORT FDST FLOW FAILED TO MODE 3. 


— CKFPACO FRTTF FLTG PNT PRT A MACRO M1113 <t-T) 12:56 PAGE 0-6 SEQUENCE 49 
TEST # 6 = LDD AND STD, WITH SRC AND DST MODE 1, TEST 
7 


| 
£4 0 010142 000446 BR F DONE 
2290 010144 FERR26: REPORT FDST FLOW FAILURE TO MODE 
2291 010144 012737 044035 001264 MOV #™S16,$TMP15 :6 OR MODE 7. 
2292 010152 012737 000646 001246 MOV #646,$TMP6 
2293 €10160 012737 000647 001252 MOV #647,$TMP10 
2294 010166 022626 CMP >ss« (SP) +, (SP) + 
2295 01€170 104043 1$: ERROR +43 
3 010172 000432 the F DONE 
2298 010174 177777 FDATIO: <1. 
2299 010176 177777 FDATI1: =1 
2300 010200 177777 FDATI2: -1 
2301 010202 177777 FDATI3: =1 
2302 010204 17/777 FDATI4: =1 
2303 010206 177777 FDATIS: =1 
2304 010210 177777 FDATI6: =-1 
2305 010212 177777 FDATI7: =1 
2306 010214 177777 -1 
2307 C10216 177777 FDATOO: =-1 
2308 010220 177777 FDATO1: -1 
2309 010222 177777 FDATO2: -1 
2310 010224 177777 FDATOS: -1 
2311 010226 177777 FDATO4: =1 
2312 010230 177777 FDATOS: =1 
2313 010232 177777 FDATO6: -1 
2314 010234 177777 FDATC™: =1 
2315 010236 177777 -1 
2316 010240 177777 FXDATO: =1 
2317 010242 177777 FXDAT1: =1 
2318 910244 177777 FXDAT2: =1 
2319 010246 177777 FXDAT3: =1 
2320 010250 052525 *XDAT4: 052525 
2321 010252 031463 FXMATS: 031463 
2322 0102546 007417 FXDAT6: 007417 
2323 010256 000477 FXDAT7: 000477 
2324 
2325 
2326 010260 F DONE : 
010260 104413 RSETUP :GO INITIALIZE THE F&S AND STACK; AND 
-SEE IF THE USER HAS EXPRESSED 
STHE DESIRE TO CHANGE THE SOF TWARE 
‘VIRTUAL CONSOLE SWITCH aggisi ER (HAS 
2327 THE USER TYPED CONTROL G?) 


2328 


L 4 
A MACRO M1113 28-MAR=81 12:56 PAGE 31 


CKFPACO FPIIF FLTG eRe eR Sa PRT SEQUENCE 50 
TEST # 7 = FSRC MODE O TEST 
2334 _SBITL TEST # 7 = FSRC MODE 0 TEST 
fs LURARAAAAAAERAERAARRAREAEARAAAERERAERAAEEAERAAAAAERAAARARE RHR ES 
S*TEST 7 FSRC MODE 0 TEST 
+t 
Se THIS IS A TEST OF FSRC MODS ZERO USING THE LDD AND LDF INSTRUCTIONS. 
kk bd deleldllelietebeliebeielel 
010262 000004 TST7: SCOPE 
2335 010264 012737 010272 001110 MOV #11, $LPERK :SET UP THE LOOP ON ERROR ADDRESS. 
2337 010272 Il: 
2338 010272 170011 SETD :SET FD. 
2339 010274 012700 011122 MOV #IDATIO,RO 
2340 010300 012701 011072 MOV #IPAT10.R1 
2341 010304 012702 004 MOV #4 ,R2 
2342 010310 012120 I2: MOV (R1)+,(RO)+ ;SET UP THE INPUT DATA BUFFER. 
3343 010312 077202 SOB R2,12 
2345 010314 012700 011122 MOV #IDATIO,PO :LOAD AC1 
2346 €10320 172510 LDD (RO) ,ACI 
2348 010322 012700 011102 MOV #IPAT20,RO ZLOAD ACO 
2349 010326 172410 LDD (RO) ,ACO 
2351 010330 012701 000001 MOV #1,R1 ZIN CASE THE FSRC FLOWS FAIL - 
2352 010334 012737 010672 000004 MOV #IERRO,ERRVECT + AN ODD ADDRESS TRAP TO 4 MAY OCCUR. 
2353 010342 012737 010356 001236 MOV #13,$TMP 
5354 010350 012737 044515 001240 MOV #M535 ,STMP3 
2355 010356 172401 13: LDD AC1,ACO sTEST INSTRUCTION. 
2356 010360 00024 14: NOP 
2337 010362 000240 15: NOP 
2359 010364 012700 011112 MOV #1DATOO,RO 
$ae0 010370 174010 STD ACO, (RO) :GET ACO, THE RESULTS. 
2362 010 012700 011112 MOV #IDATOO,RO :SEE IF DATA IS CORRECT. 
2363 010376 012701 011122 MOV #IDATIO.R1 
2364 010402 012702 000004 MOV #4 .R2 
2365 010406 022021 16: CMP (RO) +, (R1)+ 
2366 010410 001424 BEQ 1105 
2368 010412 012700 011116 MOV #IDATO2,RO :SEE IF (BUT FD) FAILED. 
2369 010416 012702 000002 MOV #2,R2 
3270 010422 005720 17: TST (RO) + 
| 3371 010424 001413 BEOQ 110 
2373 010626 012700 011116 MOV #IDATO2,RO 
2374 010432 912702 02 MOV #2,R 
2375 01 022720 177777 1$: CMP #-1,(RO)+ 
2376 010442 001402 BEQ 2$ 
2377 010444 137 010754 JMP IERR1 
2378 010450 077206 2$: SOB R2,1$ 
2379 010452 01 BR 1106 
2380 01 077216 110: SOB R2,17 
2381 01 137 010774 1106:  JMP JERR2 
2383 010462 077227 1105: SOB R2.16 





CKFPACO FPITF FLTG PNT 
iEST # 7 = FSRC MODE 0 


010506 

2392 010510 
93 

2394 010512 

tag 010516 


2397 010520 
Sane C10524 


2400 010526 


04 
2405 010550 
2406 010552 
2407 010554 


08 
2409 010556 


2414 010572 
2415 910572 


6 
2417 010574 
soi8 010600 


012700 
172510 


012700 
172410 


012701 


012700 
174010 


012737 


023737 
001402 


000137 
023737 
001372 


077217 
000520 


PRT A 
TEST 


010472 
2 


011122 
011102 


000001 
010550 
044522 


011046 


011116 


010754 
011120 


011022 


—_ 


mM 4 
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001110 


001236 
001240 


011076 


011100 


SEQUENCE 51 


:NOW TEST THE LOAD INSTRUCTION WITH FSRC MODE ZERO AND FD CLEAR. 


I11: 
112: 


113: 


= 
—) od od 
ans 


117: 


120: 


123: 


#112, $LPERR 
#IPAT10,RO 
#IDATIO,R1 


#4 ,R2 
(RO) +,(R1)+ 


R2,113 


#IDATIO,RO 
(RO) ,ACI 


#IPAT20,RO 
(RO) ,ACO 
#1,R1 

#114, $1MP2 
#MS 36, STMP3 


AC1,ACO 


#IDATOO,RO 
ACO, (RO) 


#-1, IDATI2 
#-1,1DATI3 
#IDATOO,RO 
#IDATIO.R1 

#4 .R2 
(RO) +, (R1)+ 
123 

IDATO2, IPAT12 
122 

IERR1 

IDATO3, IPAT13 
121 

IERRG 

R2,120 

IDONE 


zSET UP THE LOOP ON ERROR ADDRESS. 


SET UP AC1 


SET UP ACO 


sCLEAR FD. 
sTEST INSTRUCTION, 


SEE IF FPS IS STILL CLEAR. 


RESET TO DOUBLE MODE. 


GET ACO 


SEE IF ACO WAS CORRECT. 


;DID (BUT FD) FAIL? 


:NO ERRORS. 


71f AN ODD ADDRESS TRAP OCCURS COME HERE TO ANALYZE THE FSRC FAILURE. 





a 


rs 


CKFPACO_FPIIF FLTG PNT 
MODE 0 


TEST # 7 = FSRC 


2440 010672 


2446 070714 
2447 010720 
2448 010722 


2449 
2450 010726 
2451 010732 


2455 010752 
2456 
2457 
2458 010754 
2462 010772 
2463 


2464 
2465 010774 


2474 011044 
2475 
2476 
2477 011046 


2482 011070 
2483 

2484 
2485 0 


2486 0 
ar 0 





022716 
001413 


012737 
012737 
104051 
000457 


012737 
012737 
012737 


000000 
170360 
016161 
052525 


177777 


177777 


000000 
000000 


PRT A 
TEST 


010360 
010362 
010552 
010554 


N 4 
MACRO M1113 28=MAR=-81 12:56 PAGE 31-2 SEQUENCE 52 
IERRO: CMP #14, (SP) ;MAKE SURE THE TRAP OCCURRED 
BEQ 1$ 70N THE INSTRUCTION BEING TESTED. 
CMP M15, (SP) 
BEQ 
CMP #115, (SP) 
BEQ 1$ 
CMP #116, (SP) 
BEQ 1$ 
JMP CPSPUR 
1$: MOV (SP) ,STMP2 sREPORT FAILURE. 
1240 MOV #627 ,STMP3 
001242 MOV #320, $TMP4 
CMP (SP) +, (SP)+ 
23: ERROR +47 
BR IDONE 
;REPORT DATA ERROR. 
IERR1: 
001242 MOV #IDATIO, STMPS 
001244 MOV #1DATOO,$TMP5 
1$: ERROR +51 
BR 1 DONE 
;REPORT FAILURE OF (BUT FD) 
001244 JERR2: MOV #153, $TMP5 
001246 MOV #434 ,$TMP6 
001250 MOV 4435 ,$1MP7 
IERR25: 
$: ERROR +50 
BR IDONE 
0012 IERR4: MOV #153, STMPS 
001246 MOV #435, STMP6 
001250 MOV #434 ,STMP7 
IERR25 
rt pad INCORRECT FPS AFTER LOAD INSTRUCTION. 
001236 MOV #114,STMP2 
MUV RO, $TMP3 
001242 V #4, STMPS4 
1$: ERROR +41 
I DONE 
IPAT10: O 
IPAT11: 170360 
IPAT12: 016161 
IPAT13: 052525 
IPAT20: =1 
IPAT21: =1 
IPAT22: =1 
IPAT23: =1 
IDATOO: 0 
IDATO1: 0 


CKFPACO FPIIF FLTG PNT PRT A 
TEST # 7 = FSRC MODE O TEST 
2497 011116 000000 
2498 011120 000000 
2499 
2500 011122 000000 
11124 900000 
11126 000000 
11130 000000 
11132 
11132 104413 


nN ronrorenr 
WIA 

wlolelele) 

VMEWN— 

oo 900 


IDATO2: 
IDATO3: 


IDATIO: 
IDATI1: 
IDATI2: 
IDATI3: 


IDONE : 


B 5 
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Qo0o0 OO 


RSE TuP 3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7; THE USER TYPED CONTROL G?). 


SEQUENCE 


53 


. 5 
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TEST # 10 = FDST MODE O TEST 
2513 .SBTTL TEST # 10 = FDST MODE 0 TEST 
SPR RA REET RARE EERE ARE E EERE ARERR RARER EERE RRR REE EERE EEE 
:*TEST 10 FDST MODE O TEST 


> *THIS IS A TEST OF THE STORE INSTRUCTIONS, STD AND STF, WITH FDST MODE 0. 
+ % 


| 
| 
i 
| 
. 

s LARA R ERATE ARERAAAAAAE AAA AEREHRARRERRERARRAERARARRARERAHREE ARES 


011134 000004 TST10: SCOPE 
2516 011136 TH: 
011136 012737 011144 001110 MOV #13, $LPERR :SET UP THE LOCP ON ERROR ADDRESS. 
2515 011144 170011 1$: SETD sSET FD 
2516 011146 012700 011710 MOV #TPAT10,RO 
2517 011152 012701 011740 MOV #TDATIO.R1 
2518 011156 012702 000004 MOV #4 ,R2 
2519 011162 012021 T2: MOV (RO): ,(R1)+ 7SET UP THE INPUT DATA BUFFER. 
2920 011164 077202 SOB R2,12 
2522 611166 012700 011740 MOV #TDATIO,RO ;LOAD ACO 
e003 011172 172410 LDD (RO) ,ACO 
2525 011174 012700 011720 MOV #TPAT20,RO ;LOAD AC1 
2326 011200 172510 LDD (RO),ACI 
2528 011202 012701 000001 MOV #1,R1 :IF THE (BUT FDST) FORK FAILS 
2529 011206 012737 011516 000004 MOV ATERRO,ERRVECT “AN ODD ADDRESS TRAP COULD RESULT. 
3530 011214 012737 011230 007c30 MOV #73, $TMP2 
2531 011222 012737 044515 001240 MOV #MS35 ,STMP3 
2532 011230 174001 13 STD ACO,AC1 
2533 011232 000240 1: NOP 
2534 011234 000240 15: NOP 
2536 011236 012700 011730 MOV #TDATOO,RO 
2537 011242 174110 STD AC1, (RO) :GET THE DATA. 
2539 011244 012703 011730 - MOV #TDATOO,R3 :SEE IF THE DATA IS CORRECT. 
2540 (11250 012704 011740 MOV HTDATIO.R& 
2541 011254 012705 000004 MOV #4,R5 
2542 011260 022324 16: CMP (R3)+, (RG) + 
2543 011262 001413 BEQ T7105 
2545 011264 012703 011734 MOV #TDATO2,R3 :DID (BUT FD) FAIL? 
2546 011270 012705 000002 MOV #2,R5 
2547 011274 005723 17: TST (R3) + 
2548 011276 001402 BEC T10 
2549 011300 000137 011690 JMP TERR1 
2550 011304 077505 110: SOB R5,17 
551 011306 000137 011620 JMP TERR2 
2555 011312 077516 7105: SOB R5,16 


255 
2334 NOW TEST THE STF ACO,AC1 INSTRUCTION. 
2557 011314 111: 
seen 011314 012737 011322 001110 MOV #712, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
2559 011322 012700 011710 T12: MCV #TPAT10,RO :SET UP THE INPUT DATA BUFFER, 
60 011326 012701 011740 MOV #TDATIO,R1 


eS iets 


— 


2561 011332 
$208 011336 


Qooo00°0 
2-H 4-2 
—— — 4 
Paves 


012702 
012021 
077202 


170011 


012700 
174110 


012737 


023737 
meers 


000440 
023737 
001373 
000456 


077515 
00051° 


022716 


KFOACO FPIIF FLTG PNT PRT A 
EST # 10 = FDST MODE 0 TEST 


000004 


011740 © 


011720 


000001 
017400 
044522 


000010 


011730 


177777 


011734 


011736 


011232 
011234 
011402 
011404 
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001236 
001240 


011714 


011716 


113: 


tiv: 


T20: 


T21: 
T22: 


123: 


MOV 
MOV 


(Rs (R1)+ 


2,713 


#TDATIO,RO 
(RO) ,ACO 


#TPAT20,RO 
(RO) ,AC1 


#1,R1 
#T14,$TMP2 
AMS36,$TMP3 


ACO,AC1 


RO 

RO 
#10,RO 
117 
TERR3 


ATDATOO,RO 
AC1, (RO) 


#-1, TDATI2 
#-1, TDATI3 
ATDATCI,R3 
ATDATIO,R4 


#4,R5 

(R3)+, (RG) + 
T23 

TDATO2, TPATI2 
T22 

TERR1 

TDATO3, TPAT13 
121 

TERR 


R5,720 
TDONE 


SEQUENCE 55 


SET UP ACO 


3SET UP ACI 


:CLEAR FD 


:SEE IF FPS IS CLEAR. 


SET FD. 


sPICK UP AC1. 


zyWAS THE DATA TRANSFERRED CORRECTLY? 


;DID (BUT FD) FAIL. 


; TRAP HERE THROUGH a the 4 IF AN ODD ADDRESS OCCURS. 
TERRO: CMP #T4,(SP) MAKE S 


ft 
#75, (SP) 
1$ 
#715, (SP) 
1$ 
#116,(SP) 





URE THE TRAP WAS ON 
ZAN INSTRUCTION BEING TESTED, 


| 


Ee 


SEQUENCE 56 


=~ -- 


. 
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Es7 # 10 = FDST MODE O TEST 


RSE TUP 


2618 011544 001402 ¢ BEQ 1$ 
ah 11546 000137 042120 JMP CPSPUR 

1 011637 001236 1$: MOV (SP) ,STMP2 
2622 022626 CMP (SP)+, (SP) + 
2623 012737 000527 001240 MOV #527, $TMP3 
2624 012737 000640 001242 MOV #640, $TMP4 
2625 104121 ' 2$: ERROR +121 
2626 000464 TDONE 
2627 
2628 ;REPORT DATA FAILURE. 
2629 ; TERRI: 
2630 012737 011740 001242 MOV ATDATIO,$TMPS 
2631 012737 011730 001244 MOV #TDATOO,$TMP5 
2632 104123 1$: ERROR +123 
O37 000454 BR TDONE 
2635 ;REPORT FAILURE OF (BUT FD). 
2636 012737 000160 001246 TERR2: Mov #160,$TMP6 
2637 012737 000161 001250 MOV #161,$TMP7 
2638 012737 000640 001244 TERR25: MOV #640,$TMP5 
2639 104122 1$: ERROR +122 
2640 000441 eel TDONE 
2641 012737 000161 001246 TERRS: MOV #161, $TMP6 
2642 012737 000160 001250 MOV #160,$TMP7 
7 7 BR TERR25 
2645 REPORT INCORRECT FPS AFTER STORE INSTRUCTION. 
2646 TERR3: 
2647 664 012737 011402 001236 MOV #715, $TMP2 
2648 672 010037 001240 MOV RO, STMP3 
2649 676 012737 000010 001242 MOV #10, $1MP4 
2650 704 106041 1$: ERROR +41 
$033 706 000420 TDONE 
2653 011710 000000 TPAT10: 0 
2654 911712 170360 TPAT11: 170360 
2655 011714 016161 TPAT12: 016161 
3] 1716 052525 TPAT13: 052525 
2658 011720 177777 TPAT20: =1 
2659 011722 177777 TPAT21: =1 
2660 011724 177777 TPAT22: =1 
srt 011726 177777 TPAT23: =1 
2663 011730 000000 TDATOO: Q 
2664 011732 000000 TDATO1: O 
2665 011734 000000 TDATO2: 0 
943 011736 000000 TDATO3: 0 
2668 011740 TDATIO: 0 
2669 011742 0600000 TDATI1: 0 
2670 011744 000000 TDATI2: 0 
gal 011746 000000 TDATI3: 0° 
2673 011750 TDONE : 

011750 104413 :GO INITIALIZE THE FPS AND STACK; AND 


feFPACO FRTIF ELTG PNT PRT A 
TEST # 10 = FDST MODE O TEST 
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SEE IF THE USER HAS EXPRESSED 

7; THE DESIRE 19 CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH - » sappipen (HAS 
[THE USER TYPED CONTROL G?) 


5 
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TEST @ 17 = ACCUMULATORS DATA PATTERNS TES 


2809 .SBTTL TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 


VPP RRR RRRRRRRRRRRARARARRRSRRRRRRARR RRR RAR RRR RA RRR RRR ASR SAR SE SE SD 


S*TEST 11 ACCUMULATORS DATA >ATTERNS TEST 


.7 


[*THIS IS A TEST OF THE ao i + PROCESSOR ACCUMULATORS. 


;*EACH ACCUMULATOR IS TESTED IN TWO WAYS: 

* 1 ime of ak BY FLOAT ING A ONE ACROSS 
:8 2 ey PATTERN GENERATED BY FLOATING A ZERO ACROSS 
: A FIELD OF ON 


ES. 
: #EACH OF ACCUMULATORS ACO THROUGH ACS IS TESTED. 


: #NOTE THAT THIS TEST KEEPS 4 DYNAMIC RECORD OF THE LOG'CAL ‘AND* AND ‘OR® 
>*OF THE FAILING DATA PATTERNS. THESE CAN BE VERY USEFUL IN DETERMINING 
>*STUCK BITS. IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH (SWR13) 
Z*OFF, ln THE Bein: RECIEVE EACH INDIVIDUA! ERROR MESSAGE PLUS 

[*AN ERROR SUMMARY AT THE END OF THE TEST. INHIBI. ING ERROR PRINT OUT : 
s*WILe INMIBTT ERROR SUMMARY PRINT OUT, EXCEPT IN THE CASE DESCRIBED BELOL~ 
:*TO GET JUST THE ERROR SUMMARY WITH NO INDIVIDUAL ERROR REPORTS, 

3*SET SWITCH REGISTER BIT13 AND SWITCH REGISTER BIT? BOTH ON. 


>*THE FOLLOWING PROCEDURE IS PRESENTED TO AID THE TROUBLE 
s*SMOOTER IN SITUATIONS WHERE AM2901 CHIP ISOLATION IS ATTEMPTED. 


+ eWARNING: THIS PROCEDURE ASSUMES THAT THE FAULT IS IN ONE OF THE 
>*AM2901 CHIPS. THIS ASSUMPTION IS NOT NECESSARILY VALID IN ALL 
>*SITUATIONS. IT REMAINS TO BE SEEN WHAT NUMBER OF FAILURES CAN 
;*PROBABLILISTICALLY ASSOCIATED WITH THEM. NOTE ALSO THAT THIS 
;* INFORMATION SHOULD NOT BE TAKEN AS ABSOLUTE, THAT IS 
3*THIS INFORMATION IS THE AUTHOR'S SUGGESTION FOR ACHIEVING ISOLATION 
; *WHEN CHIP LEVEL REPAIR IS NECESSARY. 


: eWHEN THIS TEST HAS FINISHED RUNNING, IF ERRORS HAVE OCCURRED, 
;*AN ERROR SUMMARY WILi BE TYPED. THUS SUMMARY WILL CONSIST OF TwO 
>*IMPORTANT QUANTITIES: 


is A. FOUR SIXTEEN BIT NUMBERS LABELED THE LOGICAL ‘AND’ (**") 
g* OF THE FAILING DATA PATTERNS. 
3" 6. FOUR SIXTEEN Ef NUMBERS LABELED THE LOGICAL ‘OR® (‘+'") 
_ OF THE FAILING DATA PATTERNS. 


:*A BIT STUCK HIGH IN THE HARDWARE WILL SHOW UP AS A 0 IN THAT 
[*B1T POSITION OF THE "OR" OF THE FAILING DATA PATTERNS. 


:*A BIT STUCK LOW IN THE HARDWARE WILL SHOW UP AS A 1 IN THAT BIT 
¢*POSITION OF THE "AND® CF THE FAILING DATA PATTERNS. 


}+THUS IF A FAILURE OCCURS: 

: A. STUCK HIGHS WILL SHOW -, Q° S_IN THE ‘OR* PATTERN, 

7° B. STUCK LOWS WILL SHOW AS 1°S IN THE "AND PATTERN, 
3*IF THE FAILURE IS INTERMITENT os THIS PROCEDURE WILL STILL APPLY: 
s*IF THE FAILURE MOVES FROM ONE BIT TO ANOTHER, OR FROM ONE 

*GROUP OF BITS TO ANOTHER GROUP OF BITS THEN THE FAULT WILL 
;*PROBABLY NOT SHOW UP IN THE ‘AND’ OR THE ‘OR’ PATTERNS; IN THIS 
7*CASE THE ‘AND’ PATTERN WILL BE ALi 0°S AND THE ‘OR" PATTERM WIlt 
7*BE ALL 1°S. WHEN THIS OCCURS SOME OTHER METHOD OF REPAIR MUST 

:*BE FOUND (SUCH AS INSPECTION OF EACH INDIVIDUAL ERROR REPORT 


-——————_- 
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TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 


seRATER THAN USING THE SUMMARY). 


: MAP THE FOLLOWING NOTATION ONTO EACH BIT POSITION IN THF "AND* 
: SAND THE *OR' PATTERNS WHICH ARE TYPED IN THE ERROR SUMMARY. 


:eA15, A16,...A1,A0 B15,B14,...81,80 (€15,(14,...C1,C0 015,D14,...01,0 


SeIN THIS NOTATION A15 THROUGH fu IS THE FIRST OF THE a 16 BIT 
;s0C TAL NUMBERS TYPED, 815 THROUGH BO IS THE SECOND, ET 


eTHIS TABLE SHOWS THE CORRESPONDING AM2901 CHIP (*°E* NUMBER) 
:*wWHICH IS RESPONSIBLE FOR EACH BIT POSITION USING THE ABOVE 
S*NOTATION. NOTE THAT ECO'S TO THE aoe MIGHT MAKE THIS 
:*TABLE OBSOLETE IF IT IS NOT UPDATED. NOTE ALSO THAT THERE ARE 
>*FOUR BITS FOR EACH AM2901 CHIP: 


-* 


* BITS AM2901 CHIP NUMBER 
te A15,A14,A13,A12 £37 
i* A11,A1U,49, Ag E45 
:* A7,A6,A5, AG £34 
ye A3,A2.A1,A0 E42 
i B15,B14,B13,B12 £33 
:* B11.B10,B9,B8 £41 
* 87,B6,B5,.B4 E36 
3* B3,82,81,B0 £44 
te €15,€14,€13,C12 £35 
3* C7,€6,C5.C4 E38 
3” €3,C2,Ci,CO E46 
te D15,D14,D13,D12 £39 
e D11,D10,D9,D8 E47 
. D7,06.D5,D4 E46 
: D3.D2.D1,D0 E48 


NOW FIVE IMPORTANT CASES WHICH WILL ARISE WHEN A FAULTY 
: ©AM2901 1S PRESENT CAN BE DESCRIBED: 


IF ONLY ONE BIT OF THE 64 BITS IS INCORRECT THE CHIP INDICATED 
IN THE ABOVE TABLE IS MOST PROBABLY AT FAULT. BUT IF THAT 
CHIP IS REPLACED AND THE ERROR PERSISTS THEN SUPPOSE TAT 


BIT IS, 

LN WHERE ‘L' - A, B, C OR D 

AND 'N’ IS OR 0 

THEN IN GENERAL ANY OF THE FOUR CHIPS “RESPONSIBLE FOR 
AN, BN, CN OR DN COULD BE AT FAULT, WITH LN BEING MOST PrOC4BLE. 
FOR EXAMPLE IF BIT C12 IS FAULTY, THEN CHIP E79 
IS THE MOST PROBABLE SOURCE OF THE ERROR. IF REPAIRING 
THAT CHIP DOES NOT REMOVE THE FAULT THEN TRY EACH OF THE 
CHIPS ASSOCIATED WITH BITS Al2, Ble AND D12 SHOULD BE TRIED 
WITH EQUAL PROBABILITY OF ‘HE FAULT BEING 
IN ANY ONE OF 74ESE OTHER THREE CHIPS. TRY CHIPS E61, £86 AND £78, 
IF THERE ARE FOUR CONSECUTIVE BITS IN ERROR, FOLLOWING THE | 


—_— 
7 
~~ 


Be Be Be Be Be Be Se Be Be Be Be 


ee ee ee ee ee ee ee 2 
esenenenenweeweenenereenrnenee 


La) 
. 
~ 


| 
| 
| 
| 
| 
| 
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| TEST @ 11 = ACCUMULATORS DATA PATTERNS TEST 


PATTERN: 
LN, LN*1, LN*2 AND LN®S On “*° IS A, BC 


N=0,4,8 OR 12 
THEN THE ~ y TABLE SHOULD DIRECTLY IDENTIFY THE 
FAILING CHIP 


IF FOUR Nga ARE DROPPED WHICH FIT THE PATTERN: 

BN, CN AND DN WHERE N=15,14 OR Q 
THEN ANY “ONE OF THE FOUR CHIPS ASSOCIATED WITH EACH OF 
THE BITS AN, BN, CN AND DN COULD BE AT FAULT WI1H 
EQUAL PROBABILITY. 


If 16 BITS ARE IN ERROR, FITTING THE PATTERN: 
AN, Nel, AN+2, a WHERE N=0,4,8 OR 12 


CN, CN+1, CN¢2, CN+3 


AND 
DN. DN+1, DN+2, AN+3 
THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
WITH THESE BITS COULD BE AT é MILT WITH EQUAL PROBABILITY. 


IF THE FAILING BIT PATTERNS DISPLAYED IN THE ‘AND* AND THE ‘OR* 
DATA TYPED IN THE SUMMARY DOES VOT CONFORM EXPLICITELY TO 

ANY OF THE ABOVE PATTERNS, THEN THE TROUBLE SHOOTER MUST 
INTUITIVELY TRY TO FIND WHICH OF THE ABOVE CASES (1 THROUGH 4) 
IS A “BEST FIT* OF THE SYMPTOMS, 


Ww 
2 
~ 


Be Se Be Se Be Be Be He Be He 


> 
. 


Be Be Be Be Be Be OD 
wn 
. 
—_ 


ee Be Be Be ee . 
*nseneenentetnenenenenvpenerenenmrttnenneeneeeneneneeneeete 


Lee eee e nee e ee A RARER CREE RRR RARER EERE ORE R EERE RRR R ERE R ORES 
011752 000004 TST11: SCOPE 
2810 011754 170011 SETD :SET FD. 
2811 :TEST ACCUMULATOR 0 WITH FLOATING ONE 
011756 012737 044067 001244 MOV #MNUMO , STMPS 
011764 012737 012020 001236 MOV #G1,$TMP2 
011772 012700 014760 MOV #GPA'00,RO 
011776 012701 015020 MOV #GVATOO,R1 
612002 012737 012020 001110 MOV #G1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
012019 004737 014112 JSR PC ,GSETUP :LOAD TEST PATTERN. 
012014 12703 000102 MOV #102,R3 
012020 172410 GI: LDD (RO) ACO 
012022 174900 STD ACO,AC 
012024 172400 LOD ACO,ACO ;STORE THE TEST PATTERN. 
012026 174011 STD ACO, (R1) 
012030 014210 JSR PC,GCMP :COMPARE THE DATA READ WITH 
[THAT WHICH WAS WRITTEN. _ 
012034 005737 014754 TST GFLAG1 
012040 001004 BNE G2 
012042 005137 014754 COM GFLAG1 
012046 000261 SEC 
012050 000401 BR G3 
012052 000241 G2: ° cLC 
012054 006160 000006 G3: ROL 6(RO) ZGENERATE THE NEXT TEST PATTERN, 
012060 006160 000004 ROL 4 (RO) 
O12 006160 000002 ROL 2(R0) 
012070 006110 | ROL (RO) 
012072 004737 014170 JSR PC ,GRESET :RESET DEFAULT PATTERN IN OUTPUT 


BUFFER, 








60 


p--- 
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oO 
= 
ed 
—O 
~s 
o 


wren 


COOOVCDOVOO0O00 OO 
eich a—abuluabaDeaia al 
MONINMINMPGNMININONNMAH IM PM 
ed ed ao ad ed eh ec a ed 

Q FENSSEAKSRSAK 


—_— 
STS WAVE & 


PoNoNnsnoNnono 

io 

Sxx 
aro 


012220 


012224 
. 012226 


QoOo0000 

— ad td ot 
ww 
\ 
as 


\ =] 
S Sy 
4 FESES 


07733) 
004737 


012737 


012737 


€14322 


044067 
012146 


014210 
014754 
014754 


000006 
000004 
000002 


014170 


014322 
044075 


014210 
014754 
014754 


000006 
000004 
000002 
014170 
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001244 
001236 


001110 


001244 
001236 


001110 


TEST # 17 = ACCUMULATORS DATA PATTERNS TEST 


TYPE ERROR SUMMARY. 


"SET UP THE LOOP ON ERROR ADDRESS. 
:LOAD TEST PATTERN. 


STORE THE TEST PATTERN. 


;COMPARE THE DATA READ. WITH 
THAT WHICH WAS WRITTEN. 


GENERATE THE NEXT TEST PATTERN. 


RESET DEFAULT PATTERN IN OUTPUT 
; BUF F 


TYPE ERROR SUMMARY. 


SET UP THE LOOP ON ERROR ADDRESS. 
;LOAD TEST PATTERN. 


STORE THE TEST PATTERN. 
COMPARE THE DATA READ WITH 


THAT WHICH WAS WRITTEN. 
GENERATE THE NEXT TES” PATTERN. 


ety HM DEFAULT PATTERN IN OUTPUT 


sBUFFER. 


SOB R3,G1 
iSR PC. GSUM 
:TEST ACCUMULATOR 0 WITH FLOATING ZERO 
MOV #MNUMO , $TMP5S 
MOV #64,$TMP2 
MOV #GPAT10,RO 
MOV #GDATOO.R1 
MOV #64, $LPERR 
JSR PC, GSETUP 
MOV #192,R3 
Gs: LDD (RO) .ACO 
STD ACO, ACO 
LDD ACO.ACO 
STD ACO. (R1) 
JSR PC, GCMP 
TST GFLAG1 
BNE G5 
COM GFLAG1 
CLC 
BR G6 
G5: SEC 
G6: ROL 6(RO) 
ROL 4 (RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET 
SOP R3,G4 
JSR PC.GSUM 
:TEST ACCUMULATOR 1 WITH FLOATING ONE 
MOV #MNUM1 , $TMPS 
MOV #G7,$TMP2 
MOV #GPATOO,RO 
MOV #GDATOO.R1 
MOV #G7,$LPERR 
JSR PC, GSETUP 
MOV #102,R3 
G?: LDD (RO) ,ACO 
STD ACO,AC1 
LDD AC1.ACO 
STD ACO. <R1) 
JSR PC, GCMP 
TST GF LAG? 
BNE 610 
COM GF LAG! 
SEC 
BR G11 
G10: CLC 
611 ROL 6(RO) 
ROL 4 (RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET 
SOB R3,G7 


ey CC 


61 


poo — 
i 
| 
| 
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2815 


012354 
6 


012626 
072650 


004737 
012737 


077330 
004737 


012737 


014322 
044075 


014210 
014754 
14754 


000006 
000004 
000002 
014176 


014322 
044102 


014210 
014754 
014754 


000006 
000004 
000902 
014170 


014322 


K_ 5 
MACRO M1113 28-MAR=81 12:56 PAGE 33-4 


001244 
001236 


001110 


001244 
001236 


001110 


JSK PC ,GSUM 
zs TEST ACCUMULATOR 1 WITH FLOATING ZERO 
MOV #MNUM1 , $TMPS 


MOV #GDA nt 


MOV PC GSE 

G12: LDD (RD) ACO 
STD ACO,AC1 
LDD AC1,ACO 
STD ACO. (R1) 
JSR PC, GCMP 
TST GFLAG1. 
BNE G13 
cor GFLAG1 
CLC 
BR G14 

G13: SEC 

G14: ROL 6(RO) 
ROL 4 (RO) 
ROL 2(RO> 
ROL (Rk 


G 


ag 


0) 
JSR PC, GRESET 
- R3,G12 
PC,GSUM 
: TEST ACCUMULATOR. ? 2 WITH FLOATING ONE 
MOV #MNUM2 , STMP5 
MOV #615, $7MP2 
MO’! #GPATOO, | 


MOV #GDATOO,R 
MOV #G15, SUPER 


15: LDD (RO) ACO 
STD ACO,AC2 
LDD AC2, 


BNE G 
COM GFLAGi 
SEC 
BR G17 
16: CLC 
17: ROL 6(RO) 
ROL 4(RO) 
ROL 2(RO) 
ROL ( 


RO) 
JSR PC,GRESET 


SOB R3,G15 
JSR PC,GSUM 





sSET UP 


SEQUENCE 


; TYPE ERROR SUMMARY. 


;SET UP am LOOP ON ERROR ADDRESS. 


LOAD TEST PATTERN. 


STORE THE TEST PATTERN. 


;COMPARE THE DATA READ WITH 
THAT WHICH WAS WRITTEN. 


GENERATE THE NEXT TEST PATTERN. 


RESET DEFAULT PATTERN IN OUTPUT 


“BUFFER. 


:TYr€ ERROR SUMMARY. 


THE LOOP ON ERROR ADDRESS. 
;LOAD TEST PATTERN. 


:STORE THE TEST PATTERN. 


COMPARE THE DATA READ WITH 
THAT WHICH WAS WRITTEN. 


GENERATE THE NEXT TEST PATTERN. 


RESET DEFAULT PATTERN IN OUTPUT 


TYPE ERROR SUMMARY. 


62 
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TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 
2816 ;TEST ACCUMULATOR 2 WITH FLOATING ZERO 


737 044102 001244 MOV AMNUM2 , $TMPS 
737 AF Ta. 001236 MOV #G20,$TMP2 


701 015020 MOV #GDATOO.R1 


| 

012 737, 012676 001110 MOV #620, SLPERR sSET UP THE LOOP ON ERROR ADDRESS. 
O12 737, 014112 JSR PC, GSE TUP LOAD TEST PATTERN. 

012672 012703 000102 MOV #192,R3 
012676 172410 G20: LDD (RO) ,ACO 
012700 174002 STD ACD,AC> 
012702 172402 LDD AC2. C0 sSTORE THE TEST PATTERN. 
012704 176011. 1D p75. (R1) 
012706 004737 014210 - JSR rC,GCMP s COMPARE THE DATA READ WITH 

S THAT WHICH WAS WRITTEN. 
012712 005737 014754 TST GFLAG1 
012716 001004 BNE G21 
012720 005137 014754 COM GFLAG1 
012724 000241 CLC 
012726 000401 BR G22 
612730 000261 G21: SEC 
012732 006160 000006 G22: ROL. 6(RO) :GENERATE THE NEXT TEST PATTERN. 
012736 006160 000004 ROL 4(RC) 
012742 006160 000002 1 ROL 2(RO) 
012746 006110 ROL (RO) 
012750 004737 014170 JSR PC,GRESET :RESET DEFAULT PATTERN IN OUTPUT 
012754 077330 S0B R3,G620 
012756 004737 014322 JSR PC. GSUM : TYPE ERROR SUMMARY. 
2817 sTEST ACCUMULATOR 3 WITH FLOATING ONE 
012762 012737 044107 001244 MOV #MNUM3 , $TMPS 
012770 012737 013024 001236 MOV #623, $1MP2 
012776 012700 014760 MOV #GPATOO.RO 
013002 012701 015020 MOV #GDATOO.R1 
013006 012737 013024 001110 MOV #623, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
013014 004737 014112 JSR PC, GSE TUP :LOAD TEST PATTERN. 
013020 012703 000102 MoV #102,R3 
013024 172410 G23: LDD (RO) ACO 
013026 174003 STD ACO, AC 
172403 LDD AC3.ACO :STORE THE TEST PATTERN. 
013032 174011 STD ACO. (R1) 
013034 004737 014210 JSR PC, GCMP :COMPARE THE DATA READ WITH 
“THAT WHICH WAS WRITTEN. 
013040 005737 014754 TST GFLAG1 
013044 001004 BNE G24 
013046 605137 014754 COM GFLAG1 
013052 000261 SEC 
013054 000401 BR 625 
013056 000241 G24: CLC 
013060 .006160 000006 G25: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
13064 006160 000004 ROL 4(RO) 
013070 006160 000002 ROL 2(RO) 
013074 006110 ROL (RO) 
013076 004737 014170 JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
013102 077330 SOB R3,623 
013104 004737 014322 JSR PC. GSUM : TYPE ERROR SUMMARY. 
2818 : TEST ACCUMULATOR 3 WITH FLOATING ZERO 
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TEST # 117 = ACCUMULATORS DATA PATTERNS TEST 
| 013110 012737 044107 001244 MOV #MNUM3 , STMPS 
013116 012737 013152 001236 MOV #626, $TMP2 
013124 012700 014770 MOV #GPAT10,RO 
013130 012701 015020 MOV #GDATOO,R1 
013134 012737 013152 001110 MOV #626, $LPERR SET UP THE LOOP ON ERROR ADDRESS. 
013142 004737 014112 JSR PC, GSE TUP zLOAv TEST PATTERN. 
013146 012703 000102 MOV #102,R3 
013152 172410 G26: LDD (RO) ,ACO 
013154 174003 STD ACO.AC3 
013156 172403 LDD AC3.ACO :STORE THE TEST PATTERN. 
013160 174011 STD ACO, (R1) 
013162 004737 014210 JSR PC,GCMP COMPARE THE DATA READ WITH 
: THAT WHICH WAS WRITTEN. 
013166 005737 014754 TST GFLAG1 
013172 001004 BNE G27 
073174 005137 014754 COM GFLAG1 
013200 000241 CLC 
013202 000401 BR G30 
013204 000261 G27: SEC 
613206 006160 000006 G30: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
013212 006160 000004 ROL 4(RO) 
013216 006160 000002 ROL 2(RO) 
013222 006110 ROL (RO) 
013224 004737 014170 JSR PC,GRESET sRESET DEFAULT PATTERN IN OUTPUT 
013230 077330 SOB R3,626 
013232 004737 014322 JSR PC,GSUM : TYPE ERROR SUMMARY. 
2819 sTEST ACCUMULATOR 4 WITH FLOATING ONE 
013236 012737 044116 001244 MOV AMNUMS , STMPS 
013244 012737 013300 001236 MOV #G31,S$TMP2 
013252 012700 014760 MOV #GPATOO,RO 
013256 012701 015020 MOV #GDATOO,R1 
013262 012737 013300 001110 MOV #631,$LPERR SET UP THE LOOP ON ERROR ADDRESS. 
013270 004737 014112 JSR PC,GSt TUP LOAD TEST PATTERN. 
013274 012703 000102 MOV #102,R3 
013300 172410 G31: LDD (RO) ,ACO 
013302 174004 STD ACO,AC 
013304 172404 LDD AC4,ACO STORE THE TEST PATTERN. 
013306 174011 STD ACO, (R1) 
013310 004737 014210 JSR PC,GCMP COMPARE THE DATA READ WITH 
THAT WHICH WAS WRITTEN. 
Ci. 14 005737 014754 TST GFLAG1 
013520 001004 BNE G32 
013322 005137 014754 COM GFLAG1 
013326 000261 SEC 
013330 000401 BR G33 
013332 000241 G32: CLC 
013334 006160 000006 G33: ROL 6(RO) GENERATE THE NEXT TEST PATTERN. 
013 006160 000004 ROL 4(RO) 
013344 006160 000002 ROL 2(R0) 
013350 006110 ROL (RO) 
013352 004737 014170 JSR PC, GRESET sRESET DEFAULT PATTERN IN OUTPUT 
013356 077330 SOB R3,G31 
013360 004737 014322 TYPE ERRGR SUMMARY. 


JSR PC,GSUM 
2820 3 7tS3T ACCUMULATOR 4 WITH FLOATING ZERO 
013364 012737 044116 001244 MOV #MNUMS , $TMP5S 
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TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 
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SEQUENCE 


013372 012737 013426 001236 MOV #634, $TMP2 

013400 012700 014770 MOV #GPAT10,R0 

013404 012701 015020 MOV #GDATOO.R1 

013410 012737 013426 001110 MOV #634, $LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

013416 737 014112 JSR C,GSET sLOAD TEST PATTERN. 

013422 012703 000102 MOV #102,R3 

013426 172410 G24 LDD (RO) .ACO 

073430 174004 STD ACO,AC4 

013432 172404 LDD AC4,ACO sSTORE THE TEST PATTERN. 

013434 174011 STD ACO. (R1) 

013436 004737 014210 JSR PC,GCMP :COMPARE THE DATA READ WITH 
‘THAT WHICH WAS WRITTEN. 

013442 005737 014754 TST GFLAG1 

013446 001 UNE G35 

013450 005137 014754 CoM GFLAG1 

013454 000241 CLC 

013456 000401 BR 636 

013460 000261 635: Me 

013462 006160 000006 G36: _—-ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 

613466 006160 000004 ROL 4(RO) 

013472 006160 ROL 2(RO) 

013476 006110 ROL (RO) 

013500 004737 014170 JSR PC,GRESET :RESET DEFAULT PATTERN IN OUTPUT 
BUFFER. 

013504 077330 SOB R3. G34 

313506 004737 014322 JSR : TYPE ERROR SUMMARY. 

2821 s TEST ACCUMULATOR ;6 “ee FLOATING ONE 

013512 012737 0441246 001244 MOV #MNUMS , STMPS 

013520 012737 013554 001236 MOV #G37,$TMP2 

013526 012700 01476 MOV #GPATOO,RO 

013532 012701 01502 MOV #GDATOO.R1 

3536 012737 013554 001110 MOV #G637,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

013544 737 01411 JSR PC,GSET :LOAD TEST PATTERN. 

013550 012703 000102 MOV #102,R3 

013554 172410 G37: LDD (RO) .ACO 

013556 174005 STD ACO,AC5 

3560 172405 LDD AC5.ACO :STORE THE TEST PATTERN. 

013562 174011 STD ACO. (R1) 

013564 004737 014210 JSR PC, GCMP : COMPARE THE DATA READ WITH 
‘THAT WHICH WAS WRITTEN. 

013570 005737 014754 TST GFLAG1 

013574 001 BNE 640 

013576 005137 014754 COM GFLAG1 

013602 000261 ~-« SEC 

013604 1 BR G41 

013606 000241 G40: “Cc 

013610 006160 000006 G41: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 

013614 006160 000004 ROL 4(RO) : 

013620 006160 000002 ROL 2(RO) 

013624 006110 ROL (RO) 

013626 004737 014170 JSR PC, GRESET RESET DEFAULT PATTERN IN SUTPUT 

013632 077330 SOB RB. 637 

34 004737 014322 JSR GSUM sTYPE ERROR SUMMARY. 
2822 TEST actipULATOR C¢6 WITH FLOATING ZERO 
013640 012737 044124 001244 My #MNUMS , STMPS 
013646 0127387 013702 001236 MOV #G62,$TMP2 


65 
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TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 
013654 012700 014770 MOV #GPAT10,RO 
013660 012701 015020 MOV #GDATOO,R1 
013664 0127*? 013702 001110 MOV #642,$LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
013672 004757 014112 JSR PC GSE TUP ;LOAD TEST PATTERN. 
013676 012703 000102 MOV #102,R3 
013702 172410 G42: LDD (RO) ,ACO 
013704 174005 STD ACO,AC 
013706 172405 LDD ACS,ACO ;STORE Tr TEST PATTERN. 
013710 174011 STD ACO, (R1) 
013712 004737 014210 JSR PC,GCMP ; COMPARE THE DATA READ WITH 


THAT WHICH WAS WRITTEN. 
013716 005737 014754 TST A ge 


1004 
013724 005137 014754 COM GFLAG1 


013734 000261 G43: SEC 
013736 006160 000006 G44: ROL 6(RO) GENERATE THE NEXT TEST PATTERN. 


(RO) 
013754 004737 014170 JSR PC, GRESET ts A eles PATTERN IN OUTPUT 


‘013760 077330 SOB R3,642 
013762 004737 014322 JSR PC,GSUM ; TYPE ERROR SUMMARY. 


2824 013766 000137 015032 JMP 

2825 peek IMPORTANT eee e kee ek RRR Re 

2826 : * IN CASE OF AN ECO OR CHIP NUMBER CHANGE, CHANGE THE ‘CHPNUM* ASCII 

2827 he STRING AT THE APPROPRIATE LOCATIONS. 

2828 »s oe RRR KEKE EEE EERE REE EERE EE 

34 Z ars All AQ7 A03 B15 B11 B07 B03 15 11 C07 C03 D15 011 D0? DO3 
2831 ; A12 A08 A04 A00 B12 B08 B04 800 C12 C08 C04 C00 D12 D08 D04 p00 
ox 013772 105 063 067 CHPNUM: .ASCII 2639 E45 E34 E42 £33 E41 £36 E44 E35 E43 E38 E46 E39 E47 E40 E48? 


-EVEN 
2834 014072 170000 007400 000360 BITSTS: .WwORD 170000,7400,360,17,7777,170377,177417,177760 
2835 ;USE THIS ROUTINE TO INITIALIZE ALL THE DATA BUFFERS. 
2836 014112 012705 014754 GSETUP: MOV #GFLAG1,R5 
2837 014116 012704 000026 MOV #26,R4 
2838 014122 0050.5 1$: CLR (R5) + 
2839 014124 077402 SOB R4,1$ 


2841 014126 012705 014770 MOV #GPAT10,R5 
2842 014132 012704 000010 MOV #10,R4 
2843 014136 005125 2$: COM (R5)+ 

2844 014140 077402 SOB R4,2$ 


2846 014142 020037 014760 GS1: CMP RO,GPATOO 
2847 014146 001401 BEQ 3$ 
944 014150 000207 RTS PC 


2 
2850 014152 012705 015020 3$: MOV #GDATOO,RS 
2851 014156 012704 000004 MOV #4 RG 

2852 014162 005125 4$: COM (R5)+ 

2853 014164 077402 SOB R4,4$ 

2854 014166 000207 RTS P( 


™N 


66 
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| 2855 
2856 914170 
2857 014174 


2863 014210 
864 


2870 014234 


2873 014236 


2867 014516 


2891 014322 


14204 . 


012705 
01 


CKFPACO FPIIF FLTG PNT PRT A 
TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 


015020 
000004 


014142 


015020 
000004 


014236 


015030 


000010 


001240 


015020 
000506 


014756 


020000 
000200 


014756 


041342 


013772 
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001242 


164602 
164572 
001246 
001240 
001242 


001116 
001114 


014746 
01474, 


GRESET: MOV #GDATOO,RS 
MO #4 RG 
1$ CLR (RS) + 
SOB R4,1$ 
MP Gsi 
SEE IF THE 
MOV #GDATOO,R5 
MOV #4 RG 
MOV RO.R2 
1$ CMP (R2)+,(R5)+ 
BEQ 2$ 
JMP GERR1 
2$: SOB R4,1$ 
RTS PC 
: COME HERE TO REPORT AND RECORD ERRORS. 
GERR1: MOV (SP) +,GADR 
MOV R9, 1240 
MOV #GANDO,R5 
MOV #4 RG 
1$: BIS (RO), 10(R5) 
MOV (RO) +, 
COM 
BIC R2, (RS) + 
SOB R4.1$ 
MOV 1240,R0 
INC GFLAG2 
MOV P),$TMP3 
MOV #GDATOO, $TMP4 
3$ ERROR +44 
JMP @GADR 


SEQUENCE 67 


DATA WRITTEN MATCHES THE DATA READ. 


SAVE THE RETURN ADDRESS. 
;COMPUTE *OR® OF BAD DATA. 


: INCREMENT ERROR COUNT. 


SEE IF ANY ERRORS HAVE OCCURRED AND WHETHER OR NOT AN ERROR SUMMARY 


; SHOULD e. 
GSUM: 


2$ JSR 


TYPED. 


GFLAG2 
#SW13,aSWR 
#SW7 ,ASWR 


GFLAG2,$TMP6 
#GANDO ,$TM 
#GORO,$TMP4 
(SP)+,GADR 
#2$,SERRPC 
#45, $1TEMB 
PCL ERTYPE 


#CHPNUM RO 


#°?, +13 
#'?,11$+1 


2892 014326 100$ TBR NOT 
2893 014330 3, 

2894 014336 0 1$ 

2895 014340 ,aSi UMMARY ? 
2896 014346 BN 1$ IF 

2897 014350 00020 : PC Ze 

2898 014352 : : 

2899 914360 *$TMP3 

2900 014366 s 

2901 014374 “ : 

2902 014400 : 

2903 014406 000045 00 * 

2904 014414 : 

2905 014420 010046 

2906 014422 ; 

2907 014424 : RD 

2908 014426 012700 “MOVE 

2909 014432 R2 : 

2910 014436 “MOV 

2911 014444 7 ? 


ANY ERRORS? 

ANCH_IF 
7 INHIBIT ERROR PRINT QUT? 
[BRANCH IF NOT INHIBITED 
zPRINT S ? 
‘BRANCH NOT 

XIT = NO ERRORS REPORT 
7YES PRINT SUMMARY 


SAVE RETURN ADDRESS FOR POSSIBLE LOOPING 


7 SAVE ms 


ADDRESS OF CHIP NUMBER ASCII*S TO RO 
;MOVE ADDRESS OF ‘AND’ DATA TO R2 
MOVE ASCII *?° TO NEXT 3 LOCATIONS 


—————_———_-—__-—- - - 


| 
| 
| 
| 


2912 014452 


5937 014616 
2938 01462? 
2939 0146c6 


3 
2954 014702 
$322 014746 


2957 014754 


112737 


177777 


CKFPACO FPI1F FLTG PNT PRT A 
TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 


000077 
014746 
014072 


000004 
014102 
000002 
015010 
013772 
015010 


000010 


000000 
000001 


000 
000002 
014746 


000004 
014102 
014072 
000002 
015010 
000077 


014746 
001313 


000130 


103 
077 
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014750 


014746 


110 


5$: 


6$: 


7$: 


8$: 


9$: 


10$: 
11$: 


GFLAG1: . 
GFLAG2: . 


GAND 1: 


-ASCIZ 
eASCIZ 


“WORD 


#'?,11$+2 
11% 

#BITSTS,R1 
ali ta 


5 ; 

O(RO) ,11$+0 
1(RO),11$+1 
— 


° 


#4,R0 
#BITSTS+10,R1 


4$ 


#2,R2 
#GANDO+10,R2 
3$ 


#CHPNUM , RO 
#GORO ,R2 
(R2) ,~(SP) 
10(R1), (SP) 
(R1)+,(SP)+ 
7$ 
O(RO),11$ 
1(RO) ,11$+1 
22 ani 


° 


#4,R0 
> hl ct 


6 
#BITSTS,R1 


#2,R2 
#GAND0+10,R2 


6 
#°?,11$ 
8$ 


SEQUENCE 68 


TYPE ERROR MESSAGE BELOW 

“MOVE ADDRESS OF BIT TESTING TO R1 

SEE IF ANY BITS IN THE GROUP WERE SET 
‘BRANCH AROUND CHIP # PRINT IF NOT 

sMOVE 1ST ASCII DIGIT TO LOCATION 

‘MOVE 2ND ASCII DIGIT TO LOCATION 

sMOVE 3RD ASCII DIGIT TO LOCATION 

TYPE THE CHIP NUMBER 

‘MOVE ASCII POINTER TO NEXT CHIP NUMBER 

=SEE IF WE ARE DONE CHECKING THE ‘AND' SETS 
SBRANCH BACK IF NOT 
‘MAP TO NEXT ‘AND’ LOCATION 

‘SEE IF ALL ‘AND’ LOCATIONS HAVE BEEN CHECKED 
‘BRANCH BACK IF NOT 

‘RESET CHIP NUMBER ASCII POINTER IN RO 
“MOVE "OR' STARTING ADDRESS TO R2 

« ;PUT "OR' DATA ON STACK 

CLEAR BITS NOT UNDER TEST 

“SEE IF ANY BITS WERE FOUND CLEAR 

‘BRANCH AROUND CHIP # PRINTING IF OK 

:MOVE 1ST ASCII DIGIT TO LOCATION 

sMOVE 2ND ASCII DIGIT TO LOCATION 

‘MOVE 3RD ASCII DIGIT TO LOCATION 

: TYPE THE CHIP NUMBER 

*POINT RO TO NEXT ASCII CHIP REPRESENTATION 
:SEE IF WE ARE DONE CHECKING THE ‘AND' SETS 
‘BRANCH BACK IF NOT 

RESET BIT TEST CHECK WORDS ADDRESS TO R1 
‘MAP TO NEXT ‘AND' LOCATION 

:SEE IF ALL ‘AND’ LOCATIONS HAVE BEEN CHECKED 
“BRANCH BACK IF NOT 

7SEE IF ANY CHIP NUMBER HAS BEEN LOADED ~ 
“BRANCH TO RETURN JUMP IF SO 

> TYPE THE QUESTION MARKS - COULDN'T ISOLATE TO A CHIP 
“TYPE A <CRLF> 

“RESTORE Re 

RESTORE R1 

RESTORE RO 


| CKFPACO FPT1F FLTG PNT PRI A 
TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 


2969 015006 177777 GAND2: 
2970 015006 177777 GAND3: 
) 2971 015019 %00000 GORO: 
2972 015012 000000 GOR1: 
| 2973 915014 000000 GOR2 
2974 015016 000000 OR3 
75 015020 000000 GDATOO 

2976 015022 000000 GDATO1 

2977 0150246 000000 GDATO2 

2978 015026 000000 GDATO3 

2979 015030 000000 GADR 

2980 015032 GDONE : 


015032 104413 
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ooococcoo t 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 


TTHE USER TYPED CONTROL G?). 


SEQUENCE 


69 


CKFPACO FPTIF FLTG PNT PRT A 
TEST @-12 = FPP ACCUMULATORS DUAL ADDRESS TEST 


2987 


015034 
tan 4 015036 


2990 015044 
299% 015050 
2992 015054 
2993 015060 


2996 
2997 015070 
2999 015074 
3000 


3001 


3002 


aadbad aha ad 
ine Te 7 BNO &%N 


&% 


000004 
012737 


012120 
077302 


004737 


172619 


rn 


33 


nNNOW?SWS 
SxS 
pars 
=NS 
_NNOOnOmnN 


Pe 
338 


015044 001110 
01557 


015516 
015572 
015602 
075612 
015622 
015632 


015402 
015460 


015572 
000006 


015402 
015460 
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STD 
LOAD ACCUMULATOR 4 
MOV 


SEQUENCE 


.SBITL TEST # 12 = FPP ACCUMULATORS DUAL ADDRESS TEST 


4 RRR AREERE ERE REERERERARARAAAEERERRERRER THERA HRT HEREEREEHAE 


TeTEST 12 FPP ACCUMULATORS DUAL ADDRESS TEST 


T*THIS TEST PERFORMS A DUAL ADDRESSING TEST ON THE FLOATING ACCUMULATORS. 
= *NOTE THAT ACCUMULATOR ZERO IS USED TO ACCESS ALL THE OTHERS. 


* REE RA AERA RERARREE EASE REE REEEEAAAAER OEHHA REEHEERARRRERRRHEEH 


+$112: SCOPE 
MOV #Hi , SLPERR :SET Uf THE LOOP ON ERROR ADDRESS. 
H1: CLR HFLAG 
MOV #HA1W,RO SINITIALIZE THE “OAD BUFFER DATA. 
MOV #HDATI,R1 
MOV #26,R3 
H2: MOV ‘R154, (RO) * 
S08 R3,H2 
JSR PC.HCLR :CLEAR THE OUTPUT DATA BUFFER. 


H3: SETD 
LOAD ACCUMULATOR 1 
MOV 


#HATW,RO 
LDD (RO) ,ACO 
STD ACO,AC1 
LOAD ACCUMULATOR 2 
MOV #HA2W RO 
LDD (RQ) ,ACO 
STD ACO,AC2 
;LOAD ACCUMULATOR 3 
MOV #HA3W RO 
LDD (RO) ,ACO 


ACO,AC3 


#HA4W,RO 
LDD (RO) ,ACO 
STD ACO,ACS 
:LOAD ACCUMULATOR 5 
MOV MHA 


Sw,RO 
LDD (RO) ,ACO 
STD ACO,ACS 
6: JSR PC .HSTD :GO READ ALL ACCUMULATORS BACK. 
JSR PC .HCMP :SEE IF DATA IS CORRECT. 


COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 1, 
SRELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


s THE DATA, 
MOV #HAT RO 
MOV @%,R 
Oy RU.R? 
#5: f ‘Ride 
LOD (RO), AC! 
S’pD eof) 
SA MSTD TREAD ALL THE aC CUMULATORS BACK, 
+) woe SOMECK THE DATA, 


70 
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TEST @ 12 = FPP ACCUMULATORS DUAL ADDRESS TEST 


301 


015206 


COCD00000 
—_— od od od — ant eet ed 8 
Ss nononn—- — 
S¥SERNSFO 


3012 


3013 


3014 


30 
30 
30 
30 
30 
30 
$0 


BAREERS 
FNVAKRNS 


Sh Ge teeter 
m=O OBNAW 
an SRE 


077270 


hd 


o--OQO000 
Now 


ty 


015602 
000004 


015402 
015460 


015612 
000004 


015402 
015460 


015622 
000604 


015402 
015460 


015632 
000004 


015402 
015460 
015570 
015762 


Ci5570 
0715074 
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SEQUENCE 


$08 R245 
SCOMPLIMENT EACH WORD OF THE DATA STORED IN A‘CUMULATOR 2 


SRELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


7 THE DATA, 


MOV MHA2W RO 
MOV #4 ,R2 
MOV RO,R1 
H6 COM (R1)¢ 
LDD (RO) ,#°0 
STD ACQ.AC2? 
JSR PC,HSTD ;READ ALL THE ACCUMULATORS BACK. 
JSR PC ,HCMP “CHECK THE. DATA. 


SOB R 
>; COMPLIMENT EACH 
RELOAD THAT ACC 


>THE DATA 


2.H6 
WORD OF THE DATA STORED IN ACCUMULATOR 3, 
UMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


MOV #hA3W,RC 
MOV #4,R2 
MOV RO,R? 
H7: COM (R1)+ 
LDD (RO) ,ACO 
STD ACO,AC3 
JSR PC,HSTD ;READ ALL THE ACCUMULATORS BACK. 
JSR PC,HCMP ;CHECK THE DATA. 


SOB R2,H7 
; COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 4, 
“RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


3 THE DATA. 
MOV #HASW,RO 
MOV #4 ,R2 
MOV RO,R1 
H10: COM (R1)+ 
LDD (RO) ,ACO 
STD ACO,AC4 
JSR PC,HSTD ;READ ALL THE ACCUMULATORS BACK. 
JSR oente : CHECK THE DATA. 


SOB R2,H 
: COMPLIMENT EACH WORD 
“RELOAD THAT ACCUMULA 


0 
OF THE DATA STORED IN ACCUMULATOR 5, 
TOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


; THE DATA, 
MOV #HASW,RO 
MOV #4,R2 
MOV RO,R1 
H11: COM (R1)+ 
LDD (RO), ACO - 
STD ACO,AC5 
JSR PC,HSTD ;READ ALL THE ACCUMULATORS BACK. 
JSR PC ,HcCMP sCHECK THE DATA. ; 
S R2,H11 
TST HF LAG 
8rQ H12 
JMP HDONE 
Hie: OM HF LAG 
MP H3 
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CKFPACO FRTIF FLTG PNT PRT A 


TEST @ 12 = 


| 2023 
3024 015402 
3025 
015406 
915412 
075414 


015416 
015422 
015424 


3027 
015426 


| 
015434 
3028 
015436 
015442 
015444 
3029 
015446 
015452 
i 


| 3026 


015454 
3030 015456 


3058 
3059 
3060 


3061 
3042 015566 
3063 015570 
3064 


560 


004737 


012704 
172401 
174014 


012704 
172402 
174014 


012704 
172403 
174014 


012704 
172404 
174014 


(15516 
015642 


015652: 


015662 
015672 


015702 


0615566 


015534 
000050 


015642 
000024 


015572 


015762 


H 6 
MACRO M1113 28=MAR=81 12:56 PAGE 34-2 
FPP ACCUMULATORS DUAL ADDRESS TEST 


:STORE ALL ACCUMULATORS IN THE OUTPUT BUFFERS. 


HSTD: JSR PC,HCLR 


;STORE ACCUMULATOR 1 
MOV 


AHAIR,RG 
LDD AC1,ACO 
STD ACO, (R4) 

: STORE ACCUMILATOR 2 
HAR RG 
(DD ACD ACO 
SID ACD, (RG) 

:STORE ACCUMULATOR 3 
MOV HHA3R RG 
LDD AC3-ACO 
STD ACO. (R4) 

:STORE ACCUMULATOR 4 
MOV HHAGR RG 
LDD AC4, ACO 
STD ACO, (R4) 

: STORE ACCUMULATOR é 


MHASR ,R4 
UDD AC5,ACO 
STD ACO, (Ra) 


RTS 
ig DATA ear" WITH DATA READ. 
‘CMP MOV )+,HADR 
MOV wal. *R3 
MOV HHAIR RG 
MOV = - #24,,R'5 
HCMP1: CMP (R3)+,(R4)+ 


BEQ HCMP2 
JMP HERROR 


HCMP2: SOB R5,HCMP1 
@HADR 


;CLEAR THE DATA OUTPUT BUFFER. 
HCLR: MOV # 


HAIR,R4G 
MOV #24,R5 
HCLR1: CLR (R4)+ 
SOB RS,HCLR1 
RTS C 
;REPORT ERROR. 
HERROR: 
MOV #HAIW,R3 
MOV #STMP2,RS 
MOV #12,R5 
1$: MOV R3,(R4)+ 
ADD #10,R3 
SOB R5,1$ 
23: cRROR +46 
JMP HDONE 


HADR:  .WORD JV 
HFLAG: .WORD 0 


sCLEAR ALi OUTPUT BUFFERS. 


SAVE RETURN ADDRESS. 


SEQUENCE 
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— CKEPACO FP. TF FLTG PNT PRT A 
TEST # 12 = FPP ACCUMULATORS DUAL ADDRESS Tf 


2065 015572 
3066 015602 
3067 015612 

3068 015622 
| $0eg 015682 


| 70 
3071 015642 


307 
3074 015672 
3075 015702 


3076 
3099 015712 
3078 015722 
3079 015732 
3080 015742 
2081 015752 
3082 015762 
015762 


009000 


000000 


MACRO ata Se Petar 12:56 PAGE 4 § SEQUENCE 


090000 
000000 
000000 
000000 
000000 
000900 
009000 
009000 
000000 


073567 


HATW «WORD 0,0,0.0 

HA2W -WORD 0,0,0,0 

HASwW -WORD 0,0,0,0 

HAGW «WORD 0,0,0,0 

HASW WORD 0.0,9,0 

HAIR «WORD 0.0.0.0 

HA2R «WORD 0,0,0,0 

HA3R -WORD 0,9,.9.0 

HASR «WORD 0,09,0.0 

HASR . WORD 0,0,0,0 

HDAT1: .WORD Sy toe 73567,73567 
HDAT2: WORD 63146,63146,63146,63146 
HDAT3: . WORD 10421,10421,10421, 10421 
HDATS .~ WORD 31463, 31463, 31463. 31463 
HDATS .~ WORD 42104 ,42104,42104,42104 
HD 

RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


TSEE IF THE USER HAS EXPRESSED 

3; THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH Space (HAS 
; THE USER TYPED CONTROL G?) 
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CKFPACO FPTIF FLTG PNT PRT A 
TEST # 13 = FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 


TEST # 13 = FSRC MODE 0 WITH ILLEGAL ACCUMULATOR TEST 


REAR RARER EERE TEREREREEREHEE 


- TSST 13 


3092 


015764 
3093 015766 
015766 
| 3094 015774 
- 3095 015776 
3096 016002 
3097 
3098 016004 
3099 
3100 
3101 C16012 
3102 
3103 016016 
3104 016024 


SSwVAnRAaNW—oSKN 


_— 
23s 
o 


FRKAYSSVSVR BRAT 
—_ — 


| WINAINAINN NNN AS 
| ee ee et ot 
ww 
j N 
O20 C000 CoO OOO 
2-4 ~~ = — -2 
AX AGDAA BO 
2 ~~ — 8 
* Na — “SN 


000004 
012737 
170011 
012700 
172410 


012737 


012700 


012737 
005003 


172497 


005203 


012701 
174011 


012701 


0001: 
077305 
000137 


012737 
170011 


012700 
172410 


012737 
012700 
012737 
005003 


172406 
170000 


"015774 


016506 


016206 


000001 
016416 


916516 


016516 


? 016346 


016372 


016104 


016.64 
00000 
016450 


J. 6 
MACRO M1113 28-MAR=-81 12:56 PAGE 35 


. SBTTL 


FSRC“MODE O WITH ILLEGAL ACCUMULATOR TEST 


* 
:*THIS IS A TEST OF FSRC MODE 0 WITH ACCUMULATORS 6 AND 7. USE OF 


SEQUENCE 


s*E] THER OF THESE NON-EXISTENT ACCUMULATORS SHOULD RESULT IN A TRAP 10 244 


p*wiTH FEC=¢ (ILLEGAL FPP INSTRUCTION). 
** 


. RRR REAR A RAE ERE ERA REAR 


$113: 
001110 
1$: 


900244 


000004 


$5: 


S6: 


"+ aa TEST AC6. 


001110 
1$: 


000244 
000004 


SCOPE 


JMP 


#SPAT10,RO 
(RO) ,ACO 


#SERRO,FPVECT 


#1,R0 
#SERR1,ERRVECT 
R3 


AC7,ACO 


R3 
k3 


#SDATGO,R1 
ACO, (R1) 


#SDATOO,R1 
#SPAT10,R2 


#4 ,R3 
(R1)+,(R2)+ 
56 

SERR2 

R3,S5 


SERR3 
#1$,$LPERR 
#SPAT10,RO 
(RO) ,ACO 


MSERRG ,FPVECT 
#1,R 

ASERRS ,ERRVECT 
R3 


AC6,ACO 





THE LOOP ON ERROR ADDRESS. 
;SET FD 


7 SE 
LOAD ACO 


USE OF THE NON-EXISTENT AC~ 
;CUMULATOR SHOULD RESULT IN 


3A TRAP TO 244. 


zA FAILURE IN THE FSRC FLOWS 
zWILL RESULT IN AN ODD ADDRESS 
; TRAP TO 


NO TRAP OCCURRED! ! 
;SEE IF ACO WAS MODIFIED. 


;SET UP THE LOOP ON ERROR ADDRESS. 


:LOAD ACO 





74 


il 


Qo eee ee —— 


K 6 
| CKFPACO FP11F FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 35-1 SEQUENCE 
| TEST # 13 = FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 


3138 016142 005203 INC R3 

3139 016144 005203 $10: INC R3 

3141 016146 012701 016516 MOV #SDATOO,R1 

3142 016152 174011 STD ACO, (R1) :NO TRAP! GET ACO. 
3144 016154 012701 016516 MOV #SDATOO,R1 :WAS ACO MODIFIED. 
3125 016160 012702 016506 MOV #SPAT10.R2 

3146 016164 012703 000004 MOV #4 ,R3 

3147 016170 022122 $11: CMP (Ri) +, (R2)+* 

3148 016172 001402 REQ $12 

3149 016174 000127 016360 JMP SERRO 

3150 016200 077305 $12: SOF R3,S11 

3151 016202 000137 016404 JM SERR7 

3153 ; TRAPPED TO 244. 

3154 016206 021627 016030 SERRO: CMP (SP) ,#S3 :PC OF TRAP CORRECT? 
3155 Ol6212 001402 BEQ 

3196 016214. 090137 042066 JMP FPSPUR 

3158 016220 012737 016076 016502 1$: MOV #57, SADR 

3160 016226 011637 001236 SERR10: MOV (SP) ,$TMP2 

3161 016232 022626 CMP (SP)+,(SP)+ 

3162 016234 005004 CLR RG 

3163 016226 170204 STFPS RG s1S FPS CORRECT? 
3164 016240 022704 100200 CMP #100200,R4 

3165 016244 001020 | BNE SERR15 

3167 016246 005004 CLR R4 

3158 016250 170304 STST — RG s1S FEC CORRECT? 
3169 016252 022704 000002 CMP #2,R4 

3170 016256 001023 BNE SERR20 

3171 016260 000177 000216 JMP aSAD 

3173 016264 021627 016140 SERRG: CMP (SP) ,#S9 

3174 016270 001402 BEQ 1$ 

3175 016272 000137 042066 IMP FPSPUR 

3176 016276 012737 016526 016502 1$: MOV #SDONE , SADR 

5177 016304 000759 BR SERR10 

3179 ;REPORT FPS FAILURE: 

3180 016306 012737 100200 001242 SERR15: MOV #100200, $TMP4 

3181 016314 010437 001240 MOV R4.$TMPS 

3182 016320 104117 1$: ERROR +117 

5183 016322 000177 000154 JMP a@SADR 

3185 :REPORT FEC BAD: 

3186 016326 0:2737- 000002 001242 SERR20: MOV #2, $TMP4 

3187 016334 010437 001240 V R4.$TMP3 

3188 016349 104120 1$: ERROR +120 

5189 016342 000177 000134 JMP @SADR 

3191 

3192 :ACO WAS MODIFIED. (BUT FSRC) FORK FAILED. 

3193 016346 012737 016026 001236 SERR2: MOV #52,$1MP2 

3194 016254 104112 1$: ERROR +112 
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CK PACO FPI1F FLTG PNT PRT A = MACRO M1113 28-MAR-81 12:56 PAGE b.§ 2 SEQUENCE 76 
TEST # 13 = FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 
3195 016356 000463 BR SDONE 
3196 016360 012737 016136 001236 SERR6: MOV #S8,$TMP2 
3197 016366 104114 1$: ERROR +114 
3198 016370 000456 BR SDONE 
3200 016372 012737 916026 001236 SERR3: MOV #S2,$TMP2 
3201 016400 106111 1$: ERROR ab ie 
302 016402 51 BR 
3503 016406 012737 016136 001236 SERR7: MOV 4 S TMP? 
3204 016412 104113 1$: ERROR +113 
3305 016414 0004644 BR SDONE 
3207 ; caver OF (BUT A ng CAUSED AN ODD ADDRESS TRAP TO 4 
3208 016416 021627 016030 SERR1: CMP (SP) AS3 :DID TRAP OCCUR ON TESTED INSTRUCTION? 
3209 016422 001405 -BEQ 1$ . 
3210 016424 021627 016034 CMP (SP) ,#S4 
3211 016430 001402 | BEQ 1$ 
$212 016432 000137 042120 JMP CPSPUR 
3214 016436 011637 001236 1$: MOV (SP) ,STMP2 
de1> 016442 022626 CMP (SP)+, (SP) + 
3316 016444 104115 2s: ERROR +115 
3217 016446 000427 BR SDONE | 
3219 016450 021627 016136 SERRS: CMP (SP) ,#S8 DID. TRAP OCC JR ON TEST INSTRUCTION? 
3220 016454 001405 BEQ 
3221 016456 021627 016140 CMP (SP) .#S9 
3222 016462 001402 BEQ 1$ 
3223 016464 000137 042120 IMP CPSPUR 
3225 016470 011637 001236 1$: MOV (SP) ,$TMP2 
3226 016474 922626 CMP (SP)+, (SP)+ 
3227 016476 104116 2$: ERROR +116 
3e28 016500 000412 BR SDONE 
3230 016502 000000 SADR: 0 
323; 016504 177777 o1 
3232 016506 010421 SPAT10: .WORD 10421 
3233 016510 021042 SPAT11: .WORD 21042 
3234 016512 031463 SPAT12: .WORD 31463 
3235 016514 042104 SPAT13: .WORD 42104 
3237 016516 000000 SDATOO: .WORD 0 
3238 016520 000000 SDATO1: .WORD 0 
3339 016522 000000 SDATO2: .WORD 0 
5240 016524 000000 SDATO3: .WORD 0 
3242 016526 SDONE : 
016526 104413 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
‘SEE IF THE USER HAS EXPRESSED 


THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH ) pagicea (HAS 
; THE USER TYPED CONTROL G?) 





es 
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CKFPACO FP11F FLTG PNT PRT st MACRO M1113 28-MAR=81 12:56 PAGE 36 SEQUENCE 77 
TEST # 14 = FSRC MODE 2 TE 
3250 .SBITL TEST # 14 = FSRC MODE 2 TEST 
LRA RRRRR RE CR RER AEE R REE ERE RRA EERE ERE REE R AREER RTE EEE 
*TEST 14 FSRC MODE 2 TEST 


3* 
:* THIS IS A TEST OF FSRC MODE 2, AUTO 
;* INCREMENT MODE. 


RRR REET EREREREEEEEEREREEEREAEAEERRARERAEARREEE 


** 
114: SCOPE 


016530 000004 
3251 016532 012737 016540 001110 MOV #31. $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
3253 016540 Ji: 
$254 016540 170011 SETD :SET DOUBLE MODE 
3556 016542 012700 017016 MOV #JDATO,RO 
3257 016546 172410 LDD (RO) ,ACO LOAD ACO 
3559 016550 012700 016776 | MOV #JDATIO,RO 
3560 016554 005003 CLR R 
3261 616556 012737 016646 000004 MOV #JERRO,ERRVECT 
3363 016564 172420 J2: LDD (RO)+,ACO :TEST INSTRUCTION 
3264 016566 005203 53: INC R3 
5265 016570 005203 44: INC R3 
3267 016572 012701 017006 MOV #JDATOO,R1 
5268 016576 174011 STD ACO, (R15 :PICK UP RESULTS 
3370 016600 020027 016766 CMP 20,#JBUFO :WAS AN AUTO 
3271 016604 001001 BNE 1$ “DECREMENT EXECUTED? 
3272 016606 000442 QR JERR1 
3574 016610 012702 016776 1$: MOV #IDATIO,R2 :IS DATA CORRECT? 
3975 016614 012703 017006 MOV #IDATOO, R3 
3576 016620 012704 000004 MOV Re 
3277 016624 022223 JS: CMP 3s, (R3)+ 
3278 016626 001401 BEQ 
3279 016630 000443 BR JERR? 
3280 016632 077404 J6: SOB R4,J5 
3582 016634 022700 017006 CMP #JDATI0+10,RO  ;WAS RO INCREM., 
3283 016640 001401 BEO J? “BY 10 (OCTAL) 
5284 016642 000424 BR JERRI 
5286 016644 000470 J?: BR JDONE 
5288 :1F A TRAP THROUGH 4 OCCURS COME HERE 
3590 016646 021627 016566 JERRO: CMP (SP) ,#J3 :SEE IF THE TRAP : 
3291 016652 001405 BEQ 10 SOCCURRED ON THE 
3592 016654 021627 016570 CMP (SP) ,#J4 “TESTED INSTRUCTION 
3593 016660 001402 BEQ 410 
52% 016662 000137 042120 JMP CPSPUR 
3596 016666 012737 000762 001240 10: MOV #762, $TMP3 REPORT FSRC FLOW 
397 016674 012737 000322 001242 MOV 4322. $TMPG [FAILURE 
3598 316702 011637 001236 MOV (SP) “$TMP2 








N 6 
CKFPACO FP11F FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 36-1 SEQUENCE 78 
TEST # 14 = FSRC MODE 2 TEST 

3299 016706 022626 CMP (SP)+,(SP)+ 

3300 016710 104052 1$: ERROR +52 

$e05 016712 000445 BR JDONE 

3303 016714 JERR1: REPORT, RO NOT 
3304 016714 012737 016564 001236 MOV #J2,2TMP2 TCORRECTLY AFFECTED 
3305. 016722 010037 001240 MOV RO, $STMP3 

3306 016726 012737 017006 001242 MOV #JDATIO+10,$TMP4 

3307 016734 104053 1$: ERROR +53 

#306 016736 000433 BR JDONE 

$319 REPORT DATA FAILURE 

3312 016740 JERR2: 

3313 016740 012737 016564 001236 MOV #J2,$TMP2 

3314 016746 012737 016776 001240 MOV #JDATIO, $TMP3 

3315 016754 012737 017006 001242 MOV #JDATOO,STMP4 

3316 016762 104054 1$: ERROR +54 

$16 016764 000420 BR JDONE 
3319 016766 010421 JBUFO: .WORD 010421 

3320 016770 021042 JBUF1: .WORD 02104c 

3321 016772 042104 JBUF2: .WORD 042104 

$356 016774 031463 JBUF3: .WORD 031463 

3324 016776 052525 JDATIO: .WORD 052525 

3325 017000 114631 JDATI1: .WORD 114631 

3326 017002 063146 JDATI2: .WORD 063146 

$350 017004 073567 JDATI3: .WwORD 073567 

3329 017006 000000 JDATOO: .WORD 0 

3330 017010 000000 JDATO1: .WORD 0 

3331 017012 000000 JDATO2: .WORD 0 

3336 017014 000000 JDATOS: .WORD 0 

3334 017016 177777 JDATO: .WORD -1 

3335 017020 177777 JDAT1: .WORD =1 

3336 017022 177777 JDAT2: .WORD -=1 

3337 017024 177777 JDAT3: .WORD =1 

3338 

3339 

3340 017026 JDONE : 

017026 104413 RSETUP :G0 INITIALIZE THE FPS AND STACK; AND 


E IF THE USER HAS EXPRESSED 
STHE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH oe (HAS 
THE USER TYPED CONTROL G?) 


=e 
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CKFPACO FRPIIF FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 37 SEQUENCE 
TEST # 15 = FSRC MODE 4 TEST 


3349 .SBTTL TEST # 15 = FSRC MODE 4 TEST 


pee lesa pgm © tena gp conte et a SS al tl ag 


:*TEST 15 FSRC MODE 4 TEST 


sé 
t* THIS IS A TEST OF FSRC MODE 4, AUTO 
;* DECREMENT MODE. 


RRR REE AERA ARAEERERERAEAAREREAREREEAREEAAERRERARARREAR EEE 


*® 
$115: SCOPE 


017030 000004 
$329 017032. 012737 0170460 001110 MOV #kKi , SLPERR SET UP THE LOOP ON ERROR ADDRESS. 
3352 017040 Ki: 
tt0z 017040 770011 SETD SET DOUBLE MODE 
3355 017042 012700 017314 MOV #KPATO,RO 
3356 017046 172410 LDD (RO) ,ACO ;LOAD A DEFAULT 
3357 PATTERN INTO ACO 
3358 017050 012700 017274 MOV #KBUF 0,RO 
3359 017054 005003 CLR R3 
eect C17056 012737 017146 000004 MOV #KERRO,ERRVECT 
3362 017064 172440 Ke: LDD -(RO) ,ACO 7 TEST INSTRUCTION 
3363 017066 005203 K3: INC R3 
Sees 017070 005203 K4: INC R3 
3366 017072 012701 017304 MOV #KDATOO,R1 
toef 017076 174011 STD ACO, (R1) PICK UP THE RESULT 
3369 017100 020027 017304 CMP RO, AKBUF 0+10 WAS AN 
3370 017104 001001 BNE 1$ i NCREMENT "EXECUTED 
tal 017106 000441 BR KERR1 
3373 017110 012702 017264 1$: MOV AKDATIO,R2 31S DATA CORRECT? 
3374 017114 012703 017304 MOV AKDATOO,R3 
3375 017120 012704 000004 MOV #4 RS 
3376 017124 022223 K5: CMP (R2)+,(R3)+* 
3377 017126 001401 BEQ K6 
3378 017130 00044? BR KERR2 
tie 017132 077404 K6: SOB R4,K5 
3381 017134 022700 017264 CMP #KBUF 0-10 ,RO WAS RO DECREMENTED 
3382 017140 001401 BEQ K7 ;PROPERLY? 
Sear 017142 000423 BR KERR1 
aH 617144 000467 K7: BR KDONE 
3 L ; TRAP TO HERE ON AN ODD ADDRESS ERROR 
3389 017146 021627 017066 KERRO: CMP (SP) ,#K3 SEE IF THE ERROR 
3390 017152 001405 BEQ K10 OCCURRED AT THE 
3391 017154 021627 017070 CMP (SP) ,AKS 7 INSTRUCTION TESTED. 
3392 017160 001402 BEQ K10 
Sanz 017162 000137 042120 JMP CPSPUR 
3395 017166 012737 000762 001240 k10: MOV #762, $TMP3 ;REPORT FAILURE IN 
3396 017176 012737 000324 001242 MOV #324, $TMP4G FSRC FLOWS 
3397 017202 (11637 001236 MOV (SP) ,$TMP2 





f- —--—— + 


| 
| 


CKFPACO FPIIF FLTG PNT PRT A 
TEST # 15 = FSRC MODE 4 TEST 


3398 017206 
he 017210 


3201 017212 


017322 


37 017324 
017324 


¥¥ 
& 


45 


104055 


052525 
114631 
063140 
073567 


010421 


177777 


104413 


017264 


017064 
017264 
017304 
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001236 
001242 


001236 
001240 
001242 


1$: 


;REPORT 


KERR2: 


1$: 


KDATIO: 


KDATI1: . 


KDATI2: 
KDATI3: 


KBUF 0: 
KBUF 1: 
KBUF 2: 
KBUF 3: 


KDATOO: 
KDATO1: 


KDATO2: . 
KDATO3: . 


KPATO: 
KPAT1: 
KPAT2: 
DPAT3: 


KDONE : 


ERROR +55 
BR KDONE 


MOV #K2,$TMP2 
MOV RO, STMP3 
MOV MKDATIO, STMP4 
+56 
KDONE 


DATA FAILURE 


MOV #K2,$TMP2 


MOV #KDATIO, STMP3 
MOV #KDATOO, $TMP4 
ERROR +57 
BR KDONE 
-WORD 052525 
WORD 114631 
«WORD 063140 
«WORD 073567 
-WORD 010421 
WORD 031463 
WORD 042104 
WORD 021042 
«WORD 0 

WORD 0Q 

WORD 0 

WORD 0 

WORD -1 
WORD -1 
WORD -1 
«WORD -1 
RSETUP 


REPORT, RO 
> INCORRECTLY AFFECTED. 


:G0 INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

[THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH ae (HAS 
; THE USER TYPED CONTROL G?) 


SEQUENCE 


80 


ooo 


—_-———_--_-—_----_—-—-_-- ----—----- >>> —— re —= — —-—_ —- 
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| CKFPACO FPI1F FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 38 
TEST # 16 = FSRC MODE 2, WITH FD=0, TEST 


3446 .SBITL TEST # 16 = FSRC MODE 2, WITH FD=0, TEST 


4 REE E REE E RE REREREREEERERERAE REE EEEERERR ERE ARERR REE EH 


S*TEST 16 FSRC MODE 2, WITH FD=0, TEST 
of 
t* THIS IS A TEST OF FSRC MODE 2 WITH 


SEQUENCE 





| 
| <* FD=0. (AUTO INCREMENT) 
** 
Lee R RRR R RENEE ERA REESE EERE ER ER EE EEE RETR EE EEE EE EEE ETRE EEE EES 
017326 000004 1ST16: SCOPE 
3447 017380 012737 017336 001110 MOV #L1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
3449 017336 Lt: 
3450 017336 170011 SETD :SET DOUBLE MODE 
3452 017340 012700 017606 MOV #LPAT10,RO 
3455 017344 172410 LDD (RO) ,ACO :LOAD ACO 
3455 017346 012700 017630 MOV #LDATIO,RO :SET UP THE INPUT 
3456 017352 012701 017616 MOV #LPAT20.R1 “DATA 
3457 617356 012702 000004 | MOV #4 ,R2 
3459 017362 012120 1$: MOV (R1)+, (RO) + 
3460 017364 077202 SOB 2,1$ 
3462 017366 012700 017630 MOV #LDATIO,RO 
3463 017372 005003 CLR R3 
3464 017374 170001 SETF =CLEAR FD. 
3466 017376 172420 L2: LDF (RO) +, ACO 
3467 017400 005203 L3: INC R3 
3468 
3469 017402 L4: 
3470 017402 170011 SETD :SET FD 
3472 017404 012701 017642 MOV #LDATOO,R1 
3473 017410 174011 STD ACO, (R13 :PICK UP RESULTS 
3475 017412 020027 017634 CMP RO,#LDATI2 :WAS RO INCREMENTED 
3476 017416 001401 BEQ 1$ SCORRECTLY BY 4 
3477-01 7420 000421 BR LERR1 
3479 017422 012737 177777 017634 1$: MOV #-1,LDATI2 
3480 017430 012737 177777 617636 MOV #-1LDATI3 
3481 017436 012702 017630 MOV #LDATIO,R2 :1S DATA CORRECT 
3482 017442 012703 017642 MOV #LDATOO.R3 
5483 017446 012704 000004 MOV #4 RG 
3485 017452 022223 LS: cmp (R2)+, (R3)+ 
3486 017454 001401 BEQ L6 
3487 017456 000427 BR LERR2 
5488 017460 077404 L6: 5 R4.L5 
5490 017462 000673 BR L DONE 
3492 017464 LERR1 :REPORT FAILURE 
3498 017464 012737 017376 001236 MOV #2, $TMP2 “RQ NOT INCREMENTED 
3494 017472 010037 001240 MOV RO, $TMP3 “BY 4 


81 


| CKFPACO FPIIF FLTG PNT PRT A 
TEST # 16 = FSRC MODE 2, WITH FD=0, TEST 


3495 (17476 


3521 017614 
3523 017616 


3536 017652 
017652 


012737 
0 


177777 
052525 


. 114631 


017634 001242 


001236 
001240 
001242 


017376 
017630 
017642 


017616 
017642 
000004 


017376 
017630 
017644 


001236 
001240 
001242 


000001 


. ¢ 
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MOV MLDATI2,$TMP4 
ERROR +60 
BR LDONE 

LERR3: 
MOV #L2,$TMP2 
MOV ALDATIO, $TMP3 
MOV #LDATOO, STMP4 

1$: ERROR +61 
BR LDONE 

LERR2: MOV #LPAT20,R2 
MOV #LDATOO,R3 
MOV #4 RG 

1$ CMP (R2)+,(R3)+ 
BNE LERR3 
SOB R4,1$ 
MOV #L2,$TMP2 
MOV ALDATIO,$TMP3 
MOV #LDATO1,$TMPS 

2$: ERROR +62 
BR LDONE 

LPAT10: .WORD -1 

LPAT11: .WORD -<-1 

LPAT12: .WORD -1 

LPAT13: .WORD -1 

LPAT20: .WORD 052525 

LPAT21: .WORD 114631 

LPAT22: .WORD 063142 

LPAT23: WORD 073567,1 

LDATIO: .WwORD 0 

LDATI1: .WORD 0 

LDATI2: .WORD 0O 

LDATI3: .WORD 0,1 

LDATOO: .WORD QO 

LDATO1: .WORD 0 

LDATO2: .WORD 0 

LDATO3: .WwORD 0 

L DONE : 
RSETUP 


;REPORT DATA FAILURE. 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

>THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER ‘HAS 
THE USER TYPED CONTROL G?). 


SEQUENCE 


82 


-_-- --- ee SO COC ee XT 


 CKEPACO FPTIF FLTG PNT PRT A = MAC 
TEST @ 17 = FSRC MODE 2 WITH GR7, | 


. 3546 


| 
| 


—_————— ee 


3587 017774 
so58 017776 
3590 020000 
3591 020000 
3592 020006 
3593 020014 


017654 
3547 
3548 017656 
3549 017656 
3550 
3551 017660 
3552 017664 
3555 
3554 017666 
3555 017670 
3556 
3557 017676 
3558 
3559 017700 
3560 017702 


3561 017704 
e208 017706 


563 
3560 017710 
3565 017714 
3566 017716 
3567 
3568 


3569 
3570 017720 
357" 017724 
357 


2 
3573 017726 
3574 017732 
3575 17736 
3576 017740 
3577 017742 
3578 017746 
3579 017750 
3580 017752 
3581 017754 
3582 


8 
3583 017756 


000004 


170011 
012,00 
172410 
005004 
012737 
172627 


020427 
001401 
000443 


012700 
174010 


RO 
MME D 


020152 


020112 000004 
000000 


000003 — 


020172 


020172 
005204 


000003 


020172 
000004 
005204 


017676 001236 
020162 001240 
020172 001242 





ie 
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ATE MODE, TEST 
SBTITL TEST # 17 = FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 


RARER EREEAHEAREHERRTARAEEHEHHEERHEK EKER HAHKARAHAR Ee HeRe RHA 


;*TEST 17 FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 
f. THIS IS A mst OF FSRC MODE 2 
:* st Sope, GR7 (THE PC). THIS IS IMMEDIATE ~“ 


» endiieotednantanddeiaianandinankensteqetnenresteehnennseen 


tET17: SCOPE 
“1: 


SETD 
MOV #MPAT10,RO 
LDD (RO) ACO LOAD BACKROUND 
“PATTERN INTO ACO. 

CLR RG 
MOV #MERR3,ERRVECT 

mS: LD. #0,AC0 :TEST INSTRUCTION 
“WORD 5204 

m2: INC RG :NOTE THAT 

Ms: INC RG 7005204=INC R4 

mi, INC RG 
CMP Ro #3 :SEE IF THE PC 


BEQ | *WAS INCREMENTED 
:BY 2 DURING THE 


A BAD 
CONSTANT WAS GENERATED 


1¢ MOV #MDATOO,RO 
STD ACO, (RO) :GET THE DATA 
MOV #MDATOO,RO 
CMP #5204, (RO) + s1S THE DATA CORRECT? 
BEQ M5 
BR MERR1 
M5 V #3,R1 
me, TST (RO) + 
BNE M7? 
S08 R1,M6 
BR MDONE 
M?: MOV AMDATOD, RO :DID (BUT GRM) FAIL? 
MOV 
MB : CMP #504 ‘. (RO) + 
BEQ 
BR ie 
M9: SOR R* M8 
REPORT FAILURE 
MOV ams $TMP2 ‘OF (BUT GR?) 
MOY #MPAT20,$TMP3 
MOY a@MDATOO.$TMP4 


| G 7 
| ge FPT1F FLTG PNT PRT A CRO M1113 28-MAR=81 12:56 PAGE 39-1 SEQUENCE 
| TEST @ 17 = FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 


3594 020022 104063 1$: ERROR +63 

$595 020024 000466 er MDONE 

3597 020026 012705 017702 MERRO: MOV = #M2,R5 ;REFORT FAILURE 

3598 020032 010537 001242 Mov «5, $TMPG ZPC INCREMENTED 

3599 020036 162704 000003 SUB #3, RG 

3600 020042 006304 ASL RG 

3601 020044 160405 SUB RG RS 

2602 020046 010537 001240 MOV «RS, $TMP3 

3603 020052 012737 017676 001236 Mov ami 5,, STMP2 

3604 020060 104064 i$: ERROR +64 

3605 020062 000647 BR MDONE 

3607 020064 MERR?: | ;REPORT DATA 

3608 020064 012737 017676 001236 mov #15, $TMP2 ; FAILURE 

3609 020072 012737 020172 001240 Mov  #MDATOO, $TMP3 

3610 020100 012737 020162 001262 MOV #MPAT20, $TMPG 

3611 020106 104066 1$ ERROR +66 

312 020110 000434 MDONE 

3613 ; TRAP TO HERE THROUGH 4. 

3614 020112 032716 000001 MERR3: BIT #1, (SP) ;SEE IF THE 

3615 020116 001002 BNE 18 TRAP TO 4 OCCURRED 

3616 020120 000137 042120 JMP ——-CPSPUR ZBECAUSE OF AN 

3617 :0DD ADDRESS 

3618 020124 011637 001240 1$: MOV —s (SP) , STMP3 Z1F YES REPORT 

3619 020130 012737 017702 001242 MoV #2, $TMPG :BAD_CONSTANT 

3620 020136. 012737 017676 901236 mov #15, $TMP2 ; GENERATED 

3621 020144 22626 CMP (SP) +, (SP) + 

3622 020146 104065 2$: ERROR +65 

3625 020150 000414 BR MDONE ; 

3625 020152 177777 MPAT10: .WORD =1 

3626 020154 177777 MPAT11: [WORD =1 

3627 020156 177777 MPAT12: [WORD -1 

$628 020160177777 MPATI3: :WORD -1 

3630 220162 005204 MPAT20: .WORD 5204 

3631 020164 005204 MPATO1: :WORD 5204 

3632 020166 005204 MPAT22: WORD 5204 

3635 020170 005204 3 MPAT23: WORD 5204 

3635 020172 000000 MDATOO: .WORD 0 

3636 020174 000000 MDATOI: :WORD 0 

3637 020176 000000 MDATO2: :WORD 0 

3658 020200 000000 : MDATO3: {WORD 0 

3640 020202 MDONE: 

020202 104413 RSETUP GO INITIALIZE THE FPS AND STACK; AND 

TSEE IF THE USER HAS EXPRESSED 
STHE DESIRE 10 CHANGE THE SOFTWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
ZTHE USER TYPED CONTROL G?). 

3641 

3648 


| CKFPACO FPTTE FLTG PNT_PRT A 
TEST # 20 = FSRC MODE 3 TEST 


2649 


020204 


3651 020206 
3652 020206 
3653 

3654 020210 
ett 020214 


56 
3657 020216 
3658 020222 
3659 020224 
3660 


3661 
3662 020232 
3663 020234 
3664 020236 


3666 020240 
3667 020244 
3668 


3669 020246 
3670 020252 
3671 


3672 020254 
3673 020260 
3674 020262 
3675 


3676 020264 
3677 020270 
3678 020272 


3679 
3680 020274 
3681 020300 
3682 


3683 020302 
3684 020306 
3685 020312 
3686 020316 


000004 


170011 


012700 
172410 


012700 
005003 
012737 
172430 


012701 
174011 


020027 
001437 


020027 
001023 


012702 


020670 


020656 
020400 


H 7 
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006004 


SEQUENCE 


-SBTTL TEST # 20 = FSRC.MODE 3 TEST 


RARER RARE RETREAT AARERAERARERAREREEHEREHARREEREHEHR ERAS 


SSTEST 20 


FSRC MODE 3 TEST 


:* THIS IS A TEST OF FSRC MODE 3, AUTO: INCREMENT 


3* DEFERRED 


MOREA EREHRARAERARARTREEHEREHEH HERRERA eeeeenee 


75120: 


wi: 


Ne: 


N5: 


N7: 


N8: 


N9: 


N10: 


SCOPE 


SETD 


MOV 
LDD 


#NPAT10,RO 
(RO) ,ACO 


~ Sane: 


R 
#NERRO,ERRVECT 


a(RO)+,ACO 
R3 
R3 


#NDATOO,R1 
ACO, (R1) 


RO, ANPAT20+2 
Nie 


RO, ANPAT20+10 
N6 

NERR1 

RO, ANPATZ0=-10 
N7 
NERR2 

RO, ANPAT20 
N11 
#NDATOO,R2 

#4 RS 
(R2)+,#=1 

9 


N 
R3,N8 
NERR3 


#NDATOO,R2 
#NPA?20,k3 


#4 RG 
(R2)+, (R3)¢ 
NI 

R4,N10 
NERRG 


3SET FD MODE 


;LOAD ACO WITH A DEFAULT 
;PATTERN 


IF A FAILURE OCCURS 

7 IN THE FSRC FLOWS AN 

70DD TRAP TO 4 COULD OCCUR 
; TEST INSTRUCTION. 


;GET THE DATA 


sWAS RO INCREMENTED 
sBY 2? 


sFSRC MODE ?? 
sFSRC MODE 4? 


7FSRC MODE 0? — 


zFSRC MODE 1 


&5 


CKFPACO FRIIF FLTG PNT_PRT A 
TEST # 20 = FSRC MODE 3 TEST 


3698 020350 
3699 
3700 020352 


W 
“N 
Oo 
nm 
Oo 
Mm 
oO 
& 
N 


3705 020372 
enue 020374 


3707 
3708 020376 
3709 


3726 020440 
edd 020442 


3728 
3729 020444 


at 4 020562 





000505 
012702 


022716 


022676 
7 


020636 
020700 
000004 


020236 
020234 


042120 
020654 
042120 


001236 


000322 
000627 
000323 
020232 


000324 


I 7 
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N11: 
N12: 


N13: 


N14: 


BR 


NERR5 


ANDATOO,R2 
~ lg ea 


a, 
(R2)+, (R3)* 
N14 


R4,N13 
NDONE 


NERR6 


SF QUENCE 


DATA CORRECT? 


7I1F AN ODD ADDRESS TRAP OCCURS COME HERE 


NERRO: 


inf y IF THE FAILURE WAS IN THE FSRC 


zFSRC MODE 6 OR 7? 


zFSRC MODE 5? 


SWENT TO FSRC 
:MODE 6 OR 7. 


WENT fo FSRC 


sFSRC MODE 2. 


zsFSRC MODE 4 
zFSRC MODE 0 
zFSRC MODE 1 


$? ;ROQ NOT 
A#NPAT20+2,$1TMP4 ; INCREMENTED 


CMP #NG, (SP) 
BEQ NERR10 

CMP #N3, (SP) 
BEQ 1$ 

4p CPSPUR 

CMP RO, ANPAT20=2 
BEO NERR11 

JMP CPSPUR 
MOV (SP) ,STMP2 
CMP (SP) +, (SP) 
ERROR +67 
BR NDONE 
MOV (SP) ,STMP2 
CMP (SP)+, (SP)+ 
MOV #627, $TMPS 
MOV #323,$TMP7 
MOV #325, $TMP6 
ERROR +70 
BR NDONE 
MOV #322, $TMP6 
MOV #627. $TMP5 
Mov #323. $1MP7 
MOV #N2, $TMP2 
ERROR +71 
BR NDONE 
MOV #324, $TMP6 
BR NERR2O 
MOV #320, $TMP6 
BR NERR20 

MOV #321, $TMP6 
BR NERR20 
MOV RO, $TMP3 
MOV 

MOV #N2,$TMP2 
ERROR +72 

R NDONE 


en = —_ 


sPROPERLY. 


86 


‘arr sna to es tree mr, ee ee —EE 





CKFPACO FPI1IF FLTG PNT_PRT A 


TEST # 20 = FSRC MODE 3 TEST 


3755 020610 
3756 020610 
3757 020616 


0525 


3779 
3780 020710 
920710 


C20232 
020636 
0207 


00 


25 


000001 


J 7 
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052525 


NERR6: 


SEQUENCE 87 


DATS FAILURE. 
#N2,$TMP2 
#NDATOO,STMP3 
< Sehse inital 


NDONE 


¢ 
0 


0 
0,52525,52525,52525,52525 
NDATIO 


070707 
079707 
070707,1 


042194 


:GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


po 


| 


| CKFPACO FP11F FLTG PNT PRT A 
TEST # 21 = FSRC MODE S TEST 


3789 .SBITL TEST # 21 = FSRC MODE 5 TEST 


bd RRR ERTEREREREAERAERRERAARERERE ERE HERAT AHA 


kK 7 
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:STEST 21 FSRC MODE 5 TEST 
os THIS IS A TEST OF FSRC MODE 5, AUTO “E.REMENT 
:* DEFERRED. 
1c aAeeaeneeeneneeneeneeereenereenaneennnenenaneneanenensenenenene 
020712 000004 75121: SCOPE 
3791 0207.4 01: 
3792 020714 170011 SETD :SET FD MODE 
3794 020716 012700 0271374 MOV #OPAT10,RO 
3795 020722 172410 LDD (RO) ,ACO ;LOAD ACO WITH A 
3796 ;DEFAULT PATTERN, 
3797 020724 012700 021362 MOV #OPATZ1,RO 
3798 020730 005003 CLR R3 
2799 020732 012737 021104 000004 MOV WOERRO,ERRVEC IF A FAILURE 
3800 * OCCURS IN THE FSRC 
3801 ‘FLOWS AN ODD ADDR. 
3802 ; TRAP TO 4 MAY OCCUR 
3803 020740 172450 02: LDD a-(RO),ACO ; TEST INSTRUCTION 
3804 020742 005203 03: INC R3 
3805 020744 005203 04- INC R3 
3809 020746 012701 021342 MOV #ODATOO,R1 
3808 020752 174011 STD ACO, (R1) ;GET THE DATA 
3810 020754 020027 021360 CMP RO, #OPAT20 :WAS RO DECREMENTED 
3811 001436 BEQ 012 ‘BY 2? 
3813 020762 020027 021372 05: CMP RO,AOPAT21+10  ;FSRC MODE 2 
3814 020766 007901 BNE 06 
3815 020770 000505 BR OERR1 
3817 920772 020027 021352 06: CMP RO.MOPAT21-10  ;:FSRC MODE 4? 
3818 020776 001001 BNE 07 
3819 021000 000517 BR OERR2 
382 021002 020027 021362 07: CMP RO, #OPAT21 
%823 021006 012702 021344 MOV #CDATON ,R2 sFSRC MODE 0? 
3824 021012 012703 000004 MOV 44 ,R3 
3825 021016 022227 177777 08: CMP (ROD *, #-1 
3826 021022 001002 BNE 09 
3827 021024 077304 SOB R3,08 
3828 021026 000510 BR OERR3 
3830 021030 012702 021342 09: MOV #ODATOO,R2 sFSRC MODE 1? 
3831 021034 012703 021362 MOV HOPAT21.R3 
3832 021440 612704 000004 MOV #4 RG 
3833 021044 022223 010: CMP (R2)+, (R3)+ 
002 BNE 011 
SOB R4,010 
BR OERRS 





Ll 7 
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TEST # 21 = FSRC MODE 5 TEST 


3838 021054 000505 011: BR SERRS 
3840 021056 012702 021342 012: MOV #ODATOO,R2 :DATA CORRECT? 
3841 021062 012703 021404 MOV #ODATIO.R3 
3842 021066 012704 000004 MOV #4 RS 
3843 021072 020223 013: CMP (R2)+, (R3)* 
3844 021074 001002 BNE 014 
3845 021076 077403 SOB R4,013 
3846 021100 000545 BR oD 
3848 021102 000504 014: BR OERR6 
| 3850 :IF AN ODD ADDRESS TRAP OCCURS COME 
3851 THERE TO SEE IF THE FAILURE WAS IN THE 
l 385¢ TFSR® FLOWS: 
3854 021104 022716 020744 OERRO: CMP #04, (SP) sFSRC MODE 6 OR 7? 
3855 021110 001412 BEQ OERR10— 
3856 021112 022716 020742 CMP #03, (SP) 
3857 621116 001402 - BE 1$ 
3858 021120 000137 042120 JMP CPSPUR 
385% 021124 020027 021364 1$: CMP RO,AOPAT21+2 sFSRC MODE 3? 
3860 021130 001425 BEQ OERR1 
3861 021132 000137 042120 JMP CPSPUR 
38635 021136 OERR10: ;WENT TO FSRC 
3864 021136 011637 001236 MOV (SP) ,STMP2 “MODE 6 OR 7 
3865 021142 022626 CMP (SP)+,(SP)+ 
3866 021144 104074 1$: ERROR +74 
3867 021146 000522 BR ODONE 
3869 021150 011637 001240 OERR11: MOV (SP) ,STMP3 ;WENT TO FSRC MODE 
3870 021154 022626 CMP (SP) +, (SP) + 33 
2871 021156 012737 000627 001244 MOV #627, $TMP5 
3872 021164 012737 000325 001250 MOV #325. $TMP7 
3873 021172 012737 000323 001246 MOV #323. $TMP6 | 
3874 021200 104075 1$: ERROR +75 
3875 021202 ODONE 
3877 021204 012737 000322 001246 OERR1: MOV #322, $TMP6 sFSRC MODE2 
3878 021212 012737 000627 001242 OERR20: MOV #627. $TMPG 
3879 021220 012737 000325 001250 V #325_$1MP7 
3880 021226 012737 020740 001236 MOV #02, $TMP2 
3881 021234 104076 i$: ERROR +76 
021236 000466 BR ODONE 
3883 021240 012737 0003246 001246 UiRR2: MOV #324, $TMP6 :FSRC MODE 4 
3884 021246 000761 BR OERR20 
3885 021250 012737 000320 001246 OERR3: MOV #320, $TMP6 :FSRC MODE 0 
3886 021256 000755 BR OERR20 
3887 021260 012737 000321 001246 OERR4: MOV #321, $TMP6 :FSRC MODE 1 
3888 021266 000751 BR OERR20 
3890 021270 010037 001240 OERRS: MOV RO, $TMP3 :RO NOT DECREMENTED 
3891 021274 012737 021360 001242 MOV #OPAT20.$1MP4 = PROPERLY 
3892 021302 912737 020744 001236 MOV #04 ,$TMP2 
3893 021310 104077 1%: ERROR +77 
3894 021312 000440 BR ODONE ? 





eee 


— 


Mm 7 
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TEST # 21 = FSRC MODE 5 TEST 





3895 


96 021314 OERR6: DATA FAILURE 

3897 021314 012737 020740 001236 MOV #02 ,$TMP2 

3898 021322 012737 021342 001240 MOV #ODATOO, $TMP3 

3899 021330 012737 021404 001242 MOV #ODATIO, S$TMP4 

3900 021336 104100 1$: ERROR +100 

$52 021340 000425 ODONE 

3903 021342 000000 ODATOO: .WORD QO 

3904 021344 000000 ODATO1: .WORD QO 

3905 021346 000000 ODATO2: .WORD 0 

3906 021350 000000 052525 052525 ODATO3: .WORD 0,52525,52525,52525 

3907 021360 021404 OPAT20: .WORD ODATIO 

3908 021362 070707 OPAT21: .WORD 070707 

3909 021364 070707 OPAT22: .WORD 070707 

3910 021366 070707 OPAT23: .WORD 070707 

3911 021370 070707 000001 OPAT24: .WORD 070707,1 

3912 021374 177777 OPAT10: .WORD <1 

3913 021376 177777 OPAT11: .WORD <1 

3914 C21400 177777 OPAT12: .WORD -=1 

ra 021402 177777 _ QPAT13: .WORD -=1 

3917 021404 073557 ODATIO: .WORD 73547 

3918 021406 004210 ODATI1: .WORD 004210 

3919 021410 114631 ODATI2: .WORD 114631 

44 021412 125252 ODATI3: .WORD 125252 

3922 021414 ODONE : 

021414 104413 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

[THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH tama (HAS 
; THE USER TYPED CONTROL G?) 

3923 

3929 


oe ee 


N 7 
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T # 22 = FSRC MODE 6 TEST 
3930 -SBTTL TEST # 22 = FSRC MODE 6 TEST 


RRMA AARAAASRAAAAARAAREERAAARAAAARAARARHAAAAAANA RAHA ARTA AA AAA AES 





:*TEST 22 FSRC MODE 6 TEST 
:* THIS IS A TEST OF FSRC MODE 6, INDEX MODE 
Pererreerrrerrrrrrrrritrttrrrrrttrirtri titre rete 
, 021416 000004 1$122: SCOPE 

3932 021420 Pl: 
3933 021420 170011 SETD ;SET FD MODE 
3935 021422 012700 022040 MOV #PPAT10,RO 
3936 021426 172410 LDD (RO) ,ACO :LOAD A DEFAULT PATTERN 
3938 021430 012737 021536 000004 MOV WPERRO,ERRVECT IF iHE (BUT FSRC) FORO 
939 [FAILS AN ODD ADDRESS TRAP 
3940 021436 012700 021607 MOV #PDATI0=241,RO COULD OCCUR. 
3942 621442 172460 000241 P2: LDD 241(RO) .ACO 
3943 021444 P3=P2+2 
3945 021446 012701 022060 P4: MOV #PDATOO,R1 
3946 021452 174011 STD ACO, (R1) :GET THE DATA 
3947 021454 012703 000004 MOV #43 
3948 021460 012702 022050 MOV #PDATIO,R2 
3949 021464 012701 022060 MOV #PDATOO.R1 
3950 021470 022221 PS: CMP (R2)+,(R1)+ ZCHECK THE DATA 
3951 021472 00100 BNE P6 
3952 021474 077303 SOB R3,P5 
3953 021476 022700 021607 CMP #PDATI0-241,RO ;RO CORRECT? 
3954 021502 001401 BEQ 1$ 
3955 021504 000512 BR PERR21 
3956 021506 000137 022070 1$ JMP PDONE 
3958 021512 012701 022060 P6 MOV #PDATOO,R1 
3959 021516 012703 000004 MOV #4,R3 

021522 022721 177777 P7 CMP #-1,(R1)+ :WAS IT FSRC MODE 0? 
3961 021526 001401 BEQ P8 

021530 512 BR PERR1 
3963 021532 077305 P8: SOB R3,P7 
3964 021534 52 PERR2 

TRAP TO HERE ON AN ODD ADDRESS 

021536 021627 021444 PERRO: CMP (SP) 
3967 021542 001411 BEO PERR11 ; 
3968 021544 021627 021446 CMP (SP) ,#P4 :WAS IT FSRC MODE 7? 
3969 021550 001402 BEQ PERRI0 
5970 021552 137 042120 JMP CPSPUR 
3972 021556 012737 000327 001246 PERRI0: MOV #327, $TMP6 
3973 021564 000443 BR PERRI7 
3974 021566 022700 021607 PERR11: CMP #PD«T10-241,RO ;WAS IT FSRC MODE 1 
3975 021572 001004 BNE PERR12 
3976 021574 012737 000321 001246 MOV #321, $TMP6 
3977 021602 000434 BR PERR17 
3978 021604 022700 021617 PERR12: CMP #PDAT10-241+10,R0 ;WAS IT FSRC MODE 2 
3979 021610 001004 BNE PERR13 


‘ ee 


CKEPACO FPIIF FLTG PNT PRT A 
TEST # 22 = FSRC MODE 6 TEST 


3980 021612 012737 000222 
3981 021620 000425 

3982 021622 022700 021611 
3983 021626 001004 

3984 021630 012737 000323 
3985 021636 000416 

986 640 022700 021577 
001004 

021646 yet ae 000324 


021605 


000416 
14d, 021666 012737 000325 


994 

3995 021674 012737 000627 
3996 021762 012737 000326 
3997 021710 011637 001236 
3998 021714 022626 

3999 €21716 104101 

4000 021720 000463 


4002 021722 011637 001236 


021442 


4007 021740 010037 001240 
4008 021744 012737 021607 


4010 021754 000445 
40i2 021756 
737 021442 


O12 
4014 021764 012737 022050 
Ht of 022060 


012737 021442 
4021 022012 012737 000627 
4022 022020 012737 000326 


ns 

3 33 
oa Co - wi 
oo 

POM 

——_> 

NN 

SW 

on 

co] 

—_ 

~ 

N 

wW 

N 


4029 022044 177777 
on 022046 177777 
4032 022050 010421 
4033 Set 031463 
4034 022054 052525 
4035 355086 073567 
4036 


MACRO M1113 28=MAR=8° 


001246 


007 246 


001246 


001246 


001244 
001250 


001236 
001242 
001236 
001240 
001242 
001236 


001246 


MOV 
BR 
PERR13: CMP 
BNE 
MOV 
BR 
PERR14: CMP 
BNE 
MOV 
BR 
PERR15: CMP 
REQ 
BR 
PERR16: MOV 
PERR17: MOV 
MOV 
MOV 
CMP 
1$: ERROR 
Br 
PERR20: MOV 
CMP 
BR 
PERR21: MOV 
PERR22: 
MOV 
MOV 
1$: ERROR 
PERR1 
MOV 
MOV 
MOV 
1$: ERROR 
PERR2 
MOV 
MOV 
MOV 
MOV 
1$: ERROR 
BR 
PPAT10: .WORD 
PPAT11: .WORD 
PPAT12: .WORD 
PPAT13: .WORD 
PDATIO: .WORD 
PDATI1: .WORD 
PDATI2: .WORD 
PDATI3: .WORD 


eC t—s — 


8B 8 
12:56 PAGE 42-1 


#322, $TMP6 
RRi7 


PERR 

hE tie, RU 
PERR14 

#323, sure 


PERRI7 
nt eas -10,R0 
SE eat 


pr, 
®PDAT 10-2412, RO 
aa 6 


RR20 
9325, STMPE 


#627, $TMPS 
#326, $1MP7 
(SP) ,STMP2 
(SP) +, (SP)+ 


+101 


PDONE 


(SP) ,STMP2 
(SP)+, (SP)+ 
PERR22 
#P2,$TMP2 


REPORT FSRC 
sFLOWS FAILURE. 


REPORT RO AFFECTED 


RO,$STMP3 
#PDAT10-241,$TMP4 
+102 

PDONE 


DATA FAILURE. 
#P2,$TMP2 
#PDATIO, $TMP3 
#PDATOO, $TMP4 


+104 


PDONE 


3FSRC FAILURE TO 
#P2,$TMP2 sMODE 0 


sWAS IT FSRC MODE 3 


;WAS IT FSRC MODE 4 


WAS IT FSRC MODE 5 


SEQUENCE 


C 8 
| CKFPACO FPI1F FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 42-2 SEQUENCE 
| TEST # 22 = FSRC MODE 6 TEST 


4037 022060 000000 PDATOO: .WwORD ¥ 
4038 922062 000000 PDAiG1: .wORD 0 
4039 vee 000000 PDATO2: .WwORD 0 
re | 022066 000000 PDATO3: .WORD 0 
4042 022070 PDONE : 
022070 104413 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSCLE SWITCH REGISTER (HAS 
, THE USER TYPED CONTROL G?). 





-— reer. 
> 8 
| CKFPACO FPTIF FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 43 
TEST # 23 = FSRC MODE 7 TEST 





4051 _SBITL TEST # 23 = FSRC MODE 7 TEST 
| s LURAAAAAAAAAAAAERSAASHAAAAAARAEHAAALAAAAHEREERERT TORAH ONAN TANNES 
*TEST a ¢ FSRC MODE 7 TEST 
ae THIS IS A TEST OF FSRC MODE 7, INDEX 
:* DEFERRED MODE. 
erererrererrrrrrrrrrttrrtttittritttittttitetttti titre 
022072 000004 15123: SCOPE 

4052 

4053 022074 Q1: 

4094 022074 170011 SETD 

4056 022076 012700 022530 MOV #OPAT1O,RO 

4057 022102 172410 LDD (RO) ACO sLOAD A DEFAULT 

4058 ‘PATTERN INTO ACO 

4059 022104 012737 022236 000004 MOV MOERRO,ERRVECT IF THE (BUT FSRC) 

4060 + F ORK FAILS AN 

4061 ‘ODD ADR TRAP COULD 

4062 TOCCUR 

4065 022112 012700 022277 MOV #OPAT20-241,R0 

4065 022116 172470 090241 Q2: LDD @241(RO) ,ACO 

4066 022120 03=02+2 

4068 022122 012701 022550 04: MOV #OQDATOO,R1 

4069 022126 174011 STD ACO, (R1) :Gc1 THE DATA 

4071 022130 012703 000004 MOV #4 ,R3 

4072 022134 012704 02.550 MOV #QDATOO,R4 

4073 022140 012705 022560 MOV #ODATIO.RS 

4074 622144 022425 Q5: CMP (R4)+, (RS) + sCHECK THE DATA 

4075 022146 001007 BNE 06 

4076 022150 077303 SOB R3,05 

4078 022152 022700 022277 CMP #OPAT20-241,RO ;CHECK RO. 

4079 022156 001401 BEQ 1$ 

4080 022160 000514 BR QERR21 

4081 022162 000137 022570 1$: JMP QDONE 

4083 022166 012701 022550 06: MOV #HODATOO,R1 

4084 022172 012703 000004 MOV #4, 

4085 022176 022721 177777 Q7: CMP #-1,(R1)+ :WAS IT FSRC MODE 0? 

4086 022202 001002 BNE 08 

4087 022204 077304 SOB R3,07 

4088 022206 000513 BR QERR2 

4090 022210 012701 022540 a8: MOV #OPAT20,R1 
4091 022214 012702 022550 MOV #QDATOO.R2 


4092 022220 012703 000004 MOV 


#4 R3 
4093 022224 022122 Q9: CMP (R1)+,(R2)+ sWAS IT FSRC 6 
4094 022226 001401 BEQ Q10 OR DATA FAILURE 
4095 022230 000524 BR QERR1 
4096 022232 Q10: SOB R3,09 
press 022234 000504 BR QERR3 


oS 
oO 
N 
N 
Ww 
Oo 
‘> 


“4099 ; TRAP TO HERE ON AN ODD ADR FAILURE 


SEQUENCE 


94 


om ere 


CKFPACO FPIIF FLTG PNT_PRT A 
TEST # 23 = FSRC MODE 7 TEST 


4100 
4101 022236 
4102 022242 
410 


4122 022362 


4143 

4144 022436 
4145 022444 
alee 022446 


414 
4148 022454 


£13 022500 


4154 022502 
4155 022502 
4156 022510 


021627 
000137 
022700 
001004 
012737 
0004 34 
022700 
001004 
012737 
000425 
ae 
001004 
012737 
000416 
022700 
001004 
012737 


- 000407 


022700 
001401 
000416 
012737 


012737 


011637 
022626 
000403 
012737 
010037 


012737 
000403 
012737 


012737 


C21444 
042120 


022277 
000321 
022307 
000322 
022301 
000323 
022267 
000324 


022275 


000325 
000627 
000327 
001236 
001236 
022116 


001240 
022277 


000320 
000326 
000627 
000327 
022116 


022116 
022560 


E 8 
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001246 


001246 


001246 


001246 


001246 


001244 
001250 


001236 


001242 


001246 
001246 
001244 


001250 
001236 


001236 
001249 


QERRO: 


GERR11: 


QERR12: 


QERR13: 


QERR14: 


QERR15: 


QERR16: 
QERR17: 


1$: 


QERR20: 


QERR21: 
QERR22: 


SEQUENCE 
CMP (SP) ,#P3 
JMP CPSPUR 
CMP MOPAT20=241,RO ;WAS IT FSRCO 
BNE QERR12 sMODE 1? 
MOV aot, eo 
BR QERR17 
CMP ae RO sWAS IT FSRC 
BNE R13 § € 27 
MOV 7322, $TMPS 
BR QERR17 
CMP — nee RO sWAS IT FSRC 
BNE QERR sMODE 3? 
MOV q35%. STHPS 
BR QERRI7 
CMP #QPAT20-241-10,R0 sWAS IT FSRC 
BNE QERR15 sMODE 4 
MOV #324,$TMP6 
SR QERR17 
CMP #OQPAT20-241-2,R0 sWAS IT FSRC 
BEQ QERR16 sMODE 5 
BR QERR20 - 
MOV #325, $TMP6 
MOV #627, $TMP5S sREPORT FSRC FAILURE 
MOV #327,$TMP7 
MOV (SP) ,STMP2 
CMP (SP) +, (SP) + 
ERROR +105 
BR QDONE 
MOV (SP) ,STMP2 REPORT RO AFFECTED. 
CMP (SP) +, (SP) + 
RR QERR22 
MOV #02,$TMP2 


MOV RO, $TMP3 


#HOPAT20-241,$TMP4 


MOV 
ERROR +106 


BR QDONE 

MCV #320,$TMP6 
BR QERR4 

MOV #326, STMP6 
MOV #627, $1MP5 
MOV #327.$1MP7 
MOV #02,$TMP2 

FRROR +107 

BR 


QDONE 


MOV i #02, $TMP2 
MOV | #QDAT10,$™MP3 


‘ 


: WENT TO FSRC 
; MODE 

: WENT TO FSRC 
DE 6 


;DATA FAILURE 


CKFPACO FPTIF FLTG PNT _PRT A 


TEST # 23 = FSRC MODE 7 TEST 


4157 022516 
4158 022524 
022526 


4166 922540 
4167 022542 
4108 022544 
4169 %22546 


4171 022550 


4181 022570 
022570 


418¢ 


012727 
10 


177777 
022560 


052525 
009000 
000000 


000000 
000000 


073567 


104413 


022550 001242 


QPAT10: 
QPAT11: 
QPAT12: . 
QPAT13: 


QPAT20: 
QPAT21: . 
QPAT22: 
QPAT23: 


QDATOO: 
QDATO1: . 
QDATO2: 
QDATO3: 


QDATIO: 
QDATI1: 
QDATI2: . 
QDATI3: 


QDONE : 


a 
MACRO M1113 28=-MAR=81 12:56 PAGE 43-2 


#ODATOO, STMPS 
QDONE 


010421 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
TVIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


SEQUENCE 


96 


— — 
i 8 


4199 


espe 022614 
4206 022610 
4207 022626 
4208 022632 
4203 0226640 

022640 
4210 022646 


$539 022676 
4218 022704 


42 

4223 022724 

4226 622730 

4225 

4226 022732 

4227 022734 

4228 022736 

4229 

4230 022742 
022742 

4231 022750 

4232 022754 

4233 


4234 022756 
4235 022762 


ee, 


077103 
012737 
012737 
012737 


012757 


TKPPACO FRIIF FLTG PNT PRT A 


0¢7716 
025646 


000004 
177777 


000023 
023376 
022646 
000200 
023646 


23720 


001252 
022710 


000204 


023422 
022750 
000200 


023646 


G 8 
MACRO M1113 2B=-MAR-81 ye 56 PAGE 44 
| TEST @ 26 = (BUT E7B” v8), (BUT ENBT) AND (BUT Fluv) TES 


023720 
023722 
000244 


001110 


023724 
023726 
023730 


001236 


001110 


pet 


TEST # 246 = (BUT EZBT Y8),(BUT ENBT) AND (BuT Flu) TEST 


| s PAHAARHSHAAAAREAAALERERETAREAEAAARAAAAAAAHARORAAHALAROLURAOAREES 


*TEST 26 (BUT EZST Y8),(BUT ENBT) AND (BUT Fluv) TEST 


THIS IS A TEST OF THE (BUT EZBT Y8) FORK, THE 
(BUT ENBT) FORK AND (BuT FIUV) FORK IN THE 
LOAD INSTRUCTION FLOWS. 

EACH OF THE 7 beserers 


+NUM 
NUM 


-0 
1S LOADED TWICE, ONCE WITH AC>O THEN 
WITH AC=0. AFTER EACH LOAD THE FPS IS 
CHECK TO INSURE THAT CONTROL WAS PASSED 
THROUGH WITH THE FORKS PROPERLY. 


Ul: 


1$: 


U2: 


U3: 
1$: 


ST 26: SCOPE : 

CLR UF LAG 

MOV #UPATOO,RO :SET UP AC#O DATA. 

MOV #4,R1 

MOV #-1,(RO)+ 

MOV #033,UTMP1 

MOV #023, UTMP2 

MOV #MUERRO ,FPVECT 3IN CASE (BUT FIUV FAILS) 

MOV #1$,$LPERK ;SET UP THE LOOP ON ERROR ADDRESS. 
V 4 , 

LDFPS R 
V #UPATOO,RO zLOAD ACO 

LDD (RO) ,ACO 

MOV UTMP1 ,UROM1 


MOV #254 ,UROM3 


MOV #UPAT10,RO 
LDD (RO) ,ACO 
MOV RO,$TMP10 
MOV #2, $TMP2 


MOV #204 ,R4 


LOAD 0 INTO ACO 


SEE IF FPS IS CORRECT 


STFPS R5 

cmp R4.RS 

BEQ U3 

IMP UERR1 

MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #200,R0 

LDFPS RO 

MOv —s #UPATOO, RO sLoaD acoti‘ 

LDD (RO), ACO 


SEQUENCE 


97 


CKFPACO FRTIF FLTG PNT PRT A 
TEST #@ 26 = (But EZBT Y8), (BUT 


4236 022764 
4237 022772 
Se 023000 

roa | 023006 
4242 023012 
4243 023014 
4244 023020 


4245 023026 
4246 tote’ 


4250 0230446 
023044 
4251 023052 


2 
4287 023256 
4238 


4289 023260 
4290 023264 


013737 


025722 
G00003 


023506 
023052 
000200 
023646 
023722 
000403 


000056 
023676 


001252 
023114 
000210 


023506 


023154 
000200 


H 8 
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ENBT) AND (BuT Fluv) TEST 


023724 MOV UTMP2 ,UROM1 
023726 MOV #003,UROM2 
023730 MOV #054 ,UROM3 
MOV #UPAT20,R0 
US LDD (RO) ,ACO 
MOV RO. $TMP10 
007236 MOV: #U4 ,STMP2 
MOV #200,R4 
STFPS RS 
CMP R4,R5 
BEQ u5 
, JMP UERR2 
U5: 
001110 MOV #1$ , $LPERR 
1$: MOV #200,R0 
LDFPS RO 
MOV #UPATOO,RO 
LDD (RO) ,ACO 
023724 Moy UTMP2 ,UROM1 
023726 MOV #403, UROM2 
023730 MOV #056, UROM3 
MOV #UPAT30,RO 
U6 LDD (RO) ,ACO 
MOV RO,$TMP10 
001236 MOV #U6,$TMP2 
V #210,R4 
STFPS RS 
CMP R4 RS 
BEQ - U7? 
JMP ———«UERR2 
U7 3. 
001110 MOV #1$,$LPERR 
1$: MOV #200,R0 
LDFPS RO 
" MOV #UPATOO,RO 
LDD (RO) ,ACO 
023724 MOV UTMP1 ,UROM1 
023726 MOV #401 ,UROM2 
023730 MOV #256, UROM3 
MOV #UPAT4O RO 
u10 LDD (RO) ,ACO 
U 
MOV RO, $TMP10 
001236 MOV #U10,$TMP2 
V #214, R4 
STFPS 
(MP i R5 
BEQ ule 
IMP UERR1 
j12 TS! UF LAG 
BNE Ul6 
MOV #UPATOO,RO 
MOV #4 ,R1 


SEQUENCE 


7LOAD A POSITIVE NUMBER 
"NTO ACO 


sFPS CORRECT? 


SET UP THE LOOP ON ERROR ALDRESS. 


sLOAD ACU 


:LOAD A NEGATIUE 
NUMBER INTO ALO 


FPS CORRECT 


SET UP THE LOOP ON ERROR ADDRESS. 


sLOAD ACO 


sLOAD -0 INTO ACO 
; TRAP FROM HERE IF 


; (BUT FIUV) FAULS: 
;SEE IF FPS IS CORRECT. 


sSEE IF ALL THE PATTERNS 

“HAVE BEEN TEST wITH 

*BOTH AC NOT EQUAL 70 0 AND Av= 
sI1F NOT GO BACK «aD 


> CHE CK THEM WITH AC =U 


98 


| CKFPACO FRIIF FLTG PNT PRT A 


, 1 8 
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TEST @ 24 = (BuT EZBT Y8),(BUT ENBT) AND (BuT FIuv) TEST 


4291 023279 005020 
£292 023272 077102 
4293 023274 012737 177777 
4294 023302 000233 


a 023322 012737 023330 
4299 923330 012737 023572 
004200 


4302 023344 012700 023646 
4304 023352 012700 023706 


2 000240 
4308 023364 012737 023356 
4309 
4310 023372 104127 
mat 023374 000556 
3 
#576 023776 021627 023220 


0234 000137 042066 
4317 023410 011637 001236 


3 
4324 023422 032705 000004 


4326 023430 012737 000443 
4327 023436 013703 023730 
4328 023442 010337 001250 
4329 023446 Beas 000200 


RSS 


WOWSO—NWAS 
NNNWIMO 


x 

ww 

Ww 

wn 

© 

+o N 
MAREE 

An 
-Oo0° 

AWNYNNNV— 


nn 
LANG 
Ww 
o 
oO 
ae) 
w 

ha) 
&R 
oS 
<3 


4 
023726 


3 


4 
2 
5 
6 
? 02372 
3 
7 
3 
3 
3 


Mm=—NOWW—P 


~~ & 
oo 


4346 023540 


Jee te - —_ — a nas 
anes 
3 
mo 
Ooo 
Monon 
WAG 
Bas 
LAvE las) 
egecees 


U13: CLR (RO) + 
SOB R1,U13 
023716 MOV #1 UFLAG 
023720 MOV #233,UTMP1 
023722 fAOV #223, UTMP2 
JMP ul 
ulé: 
001110 MOV #1$,$LPERR 
:NOW SEE IF A TRAP CAN BE FORCED 
000244 i$: MOV MUERR3,FPVECT 
Vv #4200,R0 
LDFPS =R 
V #UPATOO,RO 
LDD (RO) ,ACO 
MOV AT4O,RO 
u15 LDD (RO) ,ACO 
U16 CFCC 
NOP 
001236 MOV #15, $TMP2 
1$: ERROR +127 
BR UDONE 


; TRAPPED TO 244. DID (BUT FlUV) 
UERRO: CMP or? ts 


BEQ 
JMP FPSPUR 
1$: MOV (SP) ,STMP2 
CMP (SP) +, (SP)+ 
2$: ERROR +126 
BR UDONE 
;COME HERE TO ANALYZE FPS ERRORS 
UERR1: BIT #4 RS 
BEQ UERR20 
001244 UERR10: MOV #443, $TMPS 


MOV UROM3 ,R3 
MOV R3,$1MP7 
BIT + dae 


BEQ t 
BIC #200,R3 
BR 2$ 
1$: BIS #200,R3 
2s: MOV R3,$TMP6 
UERR11: MOY R5_$TMP3 
MOV R4$TMPS 
1$: ERROR +124 
BR UDONE 
UERR2: BIT #4.R5 
BEQ UERR10 
001244 UERR20: MOV UROM1 , $TMPS 
MOV UROM2. 
MOV R3.$TMP7 
BIT #400,R3 
BEQ 1$ 
BIC #400,R3 


SET UP _ THE LOOP ON ERROR ADDRESS. 
BY SETTING FIUV AND LOADING -0 


sSET FD AND Fiuv 
sSET UP ACO 

;LUAD -0 

sSHOULD TRAP 70 244 


;REPORT ERROR. 
;DIDN'T TRAP 
(BUT Fluv) FAILED. 


FAIL? 


SEQUENCE 


—_ _—~ -_— 


CKFPACO FPT1F FLTG PNT PRT A 


4347 023544 


4353 023570 
4354 


4355 
4356 023572 
4357 023576 


6 
4371 023650 
4372 923652 
4373 023654 


4400 730 
4401 023732 
4402 
4403 


C00000 
000000 
000000 
400000 
010421 


177777 
114631 


167356 
100000 
000000 


001¢42 


023360 
042066 


090014 


023356 


J 8 
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TEST @ 24 = (BuT EZBT ¥8),(BUT ENBT) AND (BUT FIUV) TEST 


001236 
001242 


BR 
1$: BIS 
23: MOV 
UERR21: MOV 

MOV 
1$: ERROR 

BR 


; INTERRUPT HERE 
UERR3: CMP 


1$: CMP 


UERR4: MOV 


SEQUENCE 


WHEN FIUV SET AND ATTEMPTED TO LOAD-0 
(S?) ,#U16 

1$ 

FPSPUR 

(SP)+, (SP) + 


RO GET FEC. 
; CORRECT 


—--—-=0 O000 GO°0o° 


1 sNEG NUM 


—~— 
OfkwWw— 
NO 

GW 

— 

s 


iNEG ZERO 


100 


———_———- 


CKFPACO FPTIF FLTG PNT PRT A 
TEST # 25 = ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 


023732 000004 
4412 023734 

023734 012737 
4413 023742 012700 


rr 4 024016 001405 
4429 024020 004737 


> 
ah 
. = 
awn 
[=] 
Mon 
aS 
— 
— 
NM 
oS 
38S 
ovine 
=—-On 
S Ww 
N 


-— NN 

VS 
NOM 
=—o 
Ww 


1 
0 
4450 024124 : 
0 
1 


4455 02 
4456 024146 022021 


z 
So 
= 
oO 


023742 
000200 
024506 


023770 
024506 


024506 
024506 
000004 


024454 
024526 
000204 
000204 
001240 
024526 
024070 
000200 
024506 
024122 


024506 


024506 
024506 
000004 


k 8 
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001110 


001236 


001242 


001110 


001236 


.SBITL TEST # 25 = ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 


4 CER ER AREA RERERER ERE EEE ERE RAAREREERERARREREREEREEREKERE EERE EE 


SeTEST 25 ADDF ,ADDD,SUBF AND SUBD WITH FS°C=AC=0 TEST 
-* 

t® THIS IS A TEST OF ADD AND SUB WITH FSRC=AC=0 

** 


CER RERER EERE EEE EE REE EER ERA EAREREREEEAARERARREARRAERE 


isr2s: SCOPE 
wi: 
is MOV 41S SPER :SET UP THE LOOP ON ERROR ADDRESS. 
LDFPS RO sSET DOUBLE MODE 
mOV #WPATOO,RO “LOAD ACO=: 
LDD (RO) ACO 
MOV #2, $TMP2 
MOV #WPATOO,RO 
W2: ADDD _—« (RO) ,ACO sTEST INSTRUCTION. 
STFPS RS “GET FPS 
SETD “SET DOUBLE MODE 
MOV #WPATOC,RO 
STD ACO, (RO) :GET THE RESULT 
MOV #WPATOO,R1 
MOV #4 R2 
w3: CMP (RO) +, (R1)+ :1S RESULT CORRECT 
BEQ W4 
ZNO 
JSR PC ,WSETUP 
1$ ERROR +133 
JMP WDONE 
W4 SOB R2,w3 
CMP #204,R5 :1S FPS CORRECT 
BEQ w5 
zNO 
MOV #204, $TMP4 
MOV R5.STMP3 
1$: ERROR +137 
a JMP WDONE 
MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1$: MOV #200,RO 
LDFPS RO :SET DOUBLE MODE 
MOV #WPATOO,RO “LOAD ACO=0 
LDD (RO) ,ACO 
nt! #W6,$TMP2 
LDFPS RO :GO TO FLOATING MODE 
MOV #WPATOO,RO 
w6: ADDF (RO) ,ACO sTEST INSTRUCTION 
STFPS RS “GET FPS 
SETD ‘RESET TO DOUBLE MODE 
MOV #WPATOO,RO 
STD ACO, (RO) :GET THE RESULT 
MOV #WPATOO,R1 


#4 ,R2 
W7: CMP (RO) +,(R1)+ WAS THE RESULT 





SEQUENCE 


101 


— 


CKFPACO FP1I1F FLTG PNT PRT A 


4457 024150 601402 
4458 024152 104134 


| = 459 0246154 000564 
4460 024156 077205 
6461 024160 022705 
4462 024164 001407 
4463 
4464 024166 012737 


4465 .024174 010537 
4466 024200 104140 
4467 024202 000551 
4204 012737 

012700 


4G 

4492 024310 012737 

4493 024316 010537 

4494 024322 104141 
000500 


326 012737 
4497 024334 012700 
4498 024340 170100 
4499 024342 012700 
024346 172410 
4501 024350 012737 
4502 024356 005000 
4503 024360 170100 
4504 024362 012700 
4505 024366 173010 
4506 024370 170205 
4507 024372 170011 
4508 024374 012700 
4509 024400 174010 
4510 024402 3 


4511 024406 


000004 


000004 
001240 


024212 
000200 


024506 


024240 
024506 


024506 


024506 
000004 


024454 


000204 


000204 
001240 


024334 
000200 
024506 
024366 
024506 


024506 


024506 
000004 


Mn ASE orr sient 


MACRO M1113 28=MAR~81 
TEST # 25 = ADDF .ADDD,SUBF AND SUBD WITH FSRC=AC=0 TES 


001242 


001110 


001236 


001242 


001110 


001236 


1$: 


Ww10: 


1$: 


wil: 
1$: 


W12: 


w13: 


1$: 


Ww14: 


1$: 


w15: 


1$: 


W16: 


. @ 
—- PAGE 45-1 


#4, $TMP4 
RS, $TMP3 
a14 


#1$,$LPERR 
#200,RO 
RO 
#dPATOO,RO 
(RO) ,ACO 
#wi2,STMP2 
#WPATOO,RO 
a Ake 


#WPATOO,RO 
ACO, (RO) 
#WPATOO,R1 


#4,R2 
(RO) +, (R1)+ 
W114 


PC ,WSETUP 
#735 

wi UNE 
R2,W13 
#204,R5 
wiS . 


#204, $TMP4 
R5,$TMP3 


+141 


WDONE 

#1$, $LPERR 
#2000 
RO 
#WPATOO,RO 


(RO) ,ACO 
#W16,$TMP2 
RO 


RO 
#WPATOO,RO 
(RO) ,acO 


#WPATOO,RO 
ACO, (RO) 
#WPATOO,R1 
#4 ,R2 





SEQUENCE 


3NO. REPORT FAILURE. 


WAS FPS CORRECT 
; INCORRECT FPS. 


;SET UP THE LOOP ON ERROR ADDRESS. 


SET DOUBLE MODE 
;LOAD ACO=0 


: TEST INSTRUCTION 
sGET FPS 

;SET DOUBLE MODE 
;GET THE RESULT 


:1S RESULT CORRECT? 
NO. 


71S FPS CORRECT? 
3NO. 


:SET UP THE LOOP ON ERROR ADDRESS. 


;SET DOUBLE MODE 
;LOAD ACO=0 


sENTER FLOATING MODE. 
:TEST INSTRUCTION, 
:GET FPS 

RESET TO DOUBLE MODE 
:GET THE RESULT. 


——— — + + + a ee 


102 
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CKFPACO FPT1F FLTG PNT PRT A MACRO M1113. 28-MAR=81 12:56 PAGE 45-2 SEQUENCE 
TEST # 25 = ADDF, ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 
| 4912 024412 022021 wi7: CMP (RO) +, (R1)+* s1S RESULT CORRECT? 
4313 024414 001404 BEQ w20 
4515 024416 004737 024454 JSR PC, WSETUP 
6516 026422 104136 1$: ERROR +1 +156 
4517 024426 000440 BR ONE 
4518 024426 077207 w20: SOB Roe wi? 
4519 024430 ©22705 000004 CMP #6 =R5 z1S FPS CORRECT? 
492" 026434 001434 BEQ wDONE ti 
6522 4436 012737 000004 001242 MOV #4. STMPS 
4523 024444 010537 001240 MOV R5.$TMP3 
6524 026450 106142 1$: ERROR +142 
45¢5 O2s452 000625 BR WDONE 
32? 2 :SET UP FOR ERROR CALL 
& 
4529 0264454 012737 024506 001240 wSETUP: MOV #WPATOO, $TMP3 
4530 026462 012737 024506 001242 MOV #WPATOO.$TMP4 
4531 624470 012737 024506 001246 MOV #WPATOO, $TMP6 
4532 024476 012737 024506 001244 MOV #WPATOO.$TMPS5 
4533 024504 000207 RTS PC 
45%% 024506 000000 WPATOO: .WORD 0 
© § 024510 000000 WPATO1: .WORD 0 
4536 ©4512 000000 WPATO2: .WORD 0 
4557 (26514 000000 WPATO3: .WORD 0 
4539 524516 000000 .wWORD 0 
4540 026520 000000 WDATO1: .WORD 0 
4541 024522 000000 WDATO2: .WORD 0 
4540 024524 000000 WDATO3: .WORD 0 
4546 024526 WDONE : 
024526 104413 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH r=) sehen (HAS 
THE USER TYPED CONTROL G?) 





103 


De  _— 
f 
CKFPACO FPIIF FLTG B PNT PRT A - MACRO M1113. 28-MAR=81 12:56 PAGE M6 SEQUENCE 104 
TEST # 26 = ADDD AND SUB WITH FSRC=0 
4553 .SBITL TEST # 26 = ADDD AND SUB WITH FSRC= 0 
RARER REE AR RAE RARE EEA RARER AR EEE ARERARERAE THERE ERE REE 
T*TEST 26 ADDD AND SUB WITH FSRC=0 
a 
t® THIS IS A TEST OF ADD AND SUB WITH FSRC=0. 
: b 4 RAE RARE AREER EERE REEAERERAERERREREEER HERR A AERA RERA Rees 
024530 000004 15126: SCOPE 
4554 024532 1: 
"_ 024532 012737 024540 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4555 024540 012700 900200 $: MOV #200,R0 
4556 024544 170100 LDFPS RO :SET DOUBLE MODE 
4557 024546 012700 025312 MOV #XPATOO,RO “SET ACO TO POSITIVE 
4558 024552 010037 025300 MOV RO,XTMP “NUMBER #0 
4559 024556 172410 LDD (RO) ,ACO 
4560 024560 012737 024572 001236 MOV #X2,$TMP2 
4561 026566 012700 025322 MOV #XPAT10,RO sFSRC=0 
4562 024572 172010 x2: ADDD (RO) ,ACO STEST \NSTRUCTION 
4563 624574 170205 STFPS RS 
4564 024576 170011 SETD 
4565 024600 012700 025302 MOV #XDATOO,RO :GET RESULT. 
4566 024604 174010 STD ACO, (RO) 
4567 024606 012701 025312 MOV #XPATOO, RI 
4568 024612 012702 000004 MOV R2 
4569 024616 022021 x3: CMP (RO)*, (R1)+ :1S RESULT CORRECT? 
4570 024620 001401 BEQ 
4571 024622 000561 BR xERRI 
4572 024624 077204 x4: SOB R2,X 
4573 024626 012704 000200 MOV #200, RG 
4574 024632 020605 CMP 4,R5 :1S FPS CORRECT? 
4575 024634 001402 BEQ a 
4576 024636 000137 025250 JMP XERR2 
4577 024642 x5: 
024642 012737 024650 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4578 024650 012700 000200 1$: MOV #200,RO 
4579 024654 170100 LDFPS RO :SET DOUBLE MODE 
4580 024656 012700 025332 MOV #XPAT20,RO “SET ACO TO 
4581 024662 010037 025300 MOV RO, XTMP “NEGATIVE NUMBER 
4582 024666 172410 LDD (RO) ,ACO 
4583 024670 012737 024702 001236 MOV #X6,$TMP2 
4584 024676 012700 025322 MOV #XPAT10,RO :FSRC=0 
4585 024702 172010 X6: ADDD _— (RO) ,ACO ‘TEST INSTRUCTION 
4586 024704 170205 STFPS RS 
587 024706 1700 SETD 
4588 024710 012700 025302 “MOV #XDATOO,RO :GET RESULT 
4589 024714 174010 STD ACO, (RO) 
4590 024716 012701 025352 MOV #XPAT20,R1 
4591 024722 012702 000004 MOV #4,R2 : 
4592 024726 022021 x7: CMP (RO) +, (R1)+ :1S RESULT CORRECT? 
4593 024730 001401 BEQ x10 
4594 024732 000515 BR KERRI 
4595 024734 077204 x10: SOB - x7 
4596 024736 012704 000219 MOV O510 RG 
4597 024742 020405 CMP R4,R5 :1S FPS CORRECT? 
4598 024744 001401 BEQ x11 : 


4599 024746 000540 BR XERR2 





---- 
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CKFPACO FPI1® FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 46-1 SEQUENCE 105 


TEST # 26 = ADDD AND SUB WITH FSRC=0 


4600 024750 
4750 


02 012737 024756 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4601 026756 012700 000200 MOV #200,RO Saag ¥ 
4602 024762 170100 LDFPS RO :SET DOUBLE MODE 
4603 026764 012700 025312 MOV #XPATOO,RO ‘SET ACO TO NON-ZERO 
024770 010037 025300 MOV RO, XTMP :POSITIVE NUMBER 
6605 024774 172410 LOD (RO) ,ACO 
4606 024776 012737 025010 001236 MO / #X12.$TMP2 
4607 025004 012700 025322 MOV #XPAT10,RO :FSRC=0 
4608 025010 173010 K12: SUBD —« (RO) ,ACO ‘TEST INSTRUCTION 
4609 025012 170205 STFPS RS 
4610 025014 170011 SETD 
4611 025016 012700 025302 MOV #XDATOO,RO :GET RESULT 
4612 025022 174010 STD ACO, (RO) 
4613 025024 012701 025312 MOV #XPATOO,R1 
4614 025030 012702 000004 MOV #4 ,R2 
4615 025034 022021 . K13: cmp (RO)+,(R1)+ :1S RESULT CORRECT? 
4616 025036 001401 REQ X14 
4617 025040 65 BR XERR3 
4618 C25042 077204 K16: 50B R2,X13 
4619 025044 012704 000200 MOV #200,R4 :1S FPS CORRECT? 
4620 025050 020405 CMP R4,R 
46-1 025052 001401 BEQ x15 
025054 000503 BR XERRG 
025056 15: 
025056 012737 025064 (01110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
025064 012700 000200 1$: V #200,RO 
025070 170100 LDFPS RO :SET DOUBLE MODE 
025072 012700 025332 V #XPAT20,RO “SET ACO=A NEGATIVE 
025076 010037 025300 MOV RO, XTMP NUMBER 
025102 172410 LDD (RO) ,ACO 
2.104 012737 025116 001236 MOV #X16.$TMP2 
025112 012700 025322 MOV #XPAT10,RO :FSRC=0 
025116 173010 X16: SUBD —- (RO) ,ACO “TEST INSTRUCTION. 
025120 170205 STFPS RS 
025122 170011 SETD 
025124 012700 025302 MOV #XDATOU,RO :GET RESULT 
025130 174010 STD ACO, (RO) 
025132 012701 025332 MOV #XPAT20,R1 
025136 012702 000004 MOV #4 R2 
925142 022021 x17: CMP (RO) +, (R1)+ :1S RESULT CORRECT? 
4639 025144 001401 BEQ X20 
025146 22 BR XERR3 
025150 077204 x20: SOB R2,X17 
025152 012704 000210 MOV #210,R4 s1S FPS CORRECT? 
025156 020405 CMP RG RS 
025160 001401 BEQ x24 
025162 000440 BR KERR 
025164 000466 X21: BR XDONE 
;REPORT DATA ERRORS 
025166 012737 025322 0012460 xERR1: MOV #XPAT10,$TMP2 
025174 0177387 025300 001242 MOV KTMP, $TMPG 
025202 012737 025302 001264 MOV #XDATOO, $TMPS 
025210 104143 1$: FRROR +163 
025212 000453 aR XDONE 





| x 
| CKFPACO FPTIF FLTG PNT PRT A MACRO M1113 2B-MAR=-81 12:56 PAGE 46-2 SEQUENCE 106 
| TEST # 26 = ADDD AND SUB WITH FSRC=0 

! 


4655 025216 012737 025322 001260 XERRS: MOV #XPATIO, STMP3 
4656 025222 013737 025300 001242 MOV XTMP ,STMP4 
4657 025230 012737 025302 001264 MOV #XDATOO, $TMP5 ¢ 
4658 025236 013737 025300 001246 MOV XTMP ,STMP6 
4659 025244 104144 1$: ERROR +144 
saat 025246 000435 BR XDONE 
4662 REPORT FPS ERRORS 
4663 
4664 025250 KERR2: 
4665 025250 010537 001240 MOV R5,$TMP3 
4606 025254 010437 001242 MOV R4,$TMP4 
4667 C25260 104145 '$: ERROR +145 
4668 25262 000427 BR XDONE 
4669 025264 XERRG: 
4670 025264 010537 001240 MOV R5,$TMP3 
4671 025270 010437 001242 MOV R4,$TMP4 
4672 025274 104146 1$: ERROR +146 
4673 025276 000421 BR XDONE 
4674 C25300 000000 XTMP: . WORD 
4675 025302 000000 XDATOO: .WORD 
025304 000000 XDATO1: .wORD 0 
025306 000000 XDATO2: .WORD 0 
025310 000000 XDATO3: .WORD 0 
4680 025312 010421 .  XPATOO: .WORD 010421 
025314 021042 XPATO1: .WORD 021042 
025316 031463 XPATO2: .WORD 031463 
025320 042104 XPATO3: .WORD 042104 
025322 000000 XPAT10: .WORD 0 
025324 000000 XAPT11: .WORD 0 
025326 XPAT12: D QO 
025330 000000 XPAT13: .WORD 0 
025332 104210 XPAT2C: .WORD 104210 
025334 114631 XPAT21: .WORD 114631 
025336 125252 XPAT22: .WORD 125252 
025349 135673 XPAT23: .WORD 135673 
025342 XDONE : 
025342 104413 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 





-———-- 


CKFPACO FP11F FLTG PNT PRT A 
TEST # 27 = SUBD WITH AC=0 Test 


4703 


025344 
025702 


012737 
012737 


000210 


025402 
000200 


025742 
025704 


025712 


000004 
025706 


025710 


oO 
8 
=i 
* 
oO 
= 


025702 
177777 
025732 


025722 
000200 


000004 
025704 
025712 


025422 


025700 
4749 025612 


| RRR ARHES 
RANRRRR 
DWNAUSWIM 
DOoo00o 
NMGNMSNMNNPY 
WANNA 
2 en 
_ PSSNN 
On fs AOnonr 
o-OOoCoOoO 
oo----— 
DS SWRNMWPO 
=—NNNNN 
NNW 
NNNNNN 
ooo 
MoNMoNM 
VW 
YXS 
Noms 
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025704 
025706 
025710 


001110 


025702 
025704 
025706 
025710 


001236 


001246 


. SBITL 


TEST # 27 = SUBD WITH AC=0 TEST 


ERATE ERAT ARRAAEA ERE EERE AEHEREKR CREEK ERE 


S*TEST 27 


7* 
:* THIS IS A TEST OF SUBD WITH AC=0. 
3* AND NEGATIVE FSRC'S ARE TRIED. 


* 


SUBD WITH AC=0 TEST 


BOTH POSITIVE 


SS RERRRAREAREERRAREEREREERREERERRERRAAERARRERERERRRARRAREARRR REAL 


1$127: 


V1e 


Y2: 


Y3: 


Y4: 


YS: 
¥6: 


v7: 


SCOPE 


YFLAG 
#YPATOO, YTMP1 
#YPAT10, YIMP2 
#210, YTMP3 


#1$,$LPERR 
#200,R0 


K 
#YPAT20,RO 
ACO 


#-1,YFLAG 
#YPAT10,YTMP1 
MYPATOO, YTMP2 
~ papeahiedy 

Y 


YDONE 


#4 ,R2 
#YTMP1 RO 
#YDATOO,R1 
(RO) +,(R1)+ 


#Y2,$TMP2 
YTMP1,$TMP3 
#YPAT20, $TMP4 
#YDATOO. $TMPS 
YTMP2, $TMP6 
+147 


YDONE 


Ms 
iN 


;SET UP THE LOOP ON ERROR ADDRESS. 


;SET DOUBLE MODE 
:SET ACO=0 


3 TEST INSTRUCTION 
;GET RESULT 


7 CHECK RESULT. 


FPS CORRECT? 


sFINISHED TEST? 


OR OF SIGN BIT 


DATA FAILURE 


SEQUENCE 107 


CKFPACO FRPI1F FLTG PNT PRT A 
TEST # 27 = SUBD WITH AC=0 TEST 


4750 025614 


E 9 
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YERR2: 


:XOR OF SIGN BIT 


012737 025422 001236 MOV #Y2,$TMP2 “FAILED 
4752 025622 013737 025706 001240 MOV YTMP1, $TMP3 
6753 025630 012737 025742 001242 MOV #YPAT20,$TMP4 
4754 025636 012737 025712 001244 MOV #YDATOO,$TMPS 
4755 025644 013737 025706 001246 MOV YTMP2, $TMP6 
4756 025652 104150 1$: ERROR +150 
4757 025654 0004636 BR YDONE 
4758 025656 YERR3 sFPS WRONG. 
4759 025656 012737 025422 001236 MOV #Y2,$TMP2 
4760 025 010537 0012460 MOV R5,$TMP3 
4761 025670 013737 025710 001242 MOV YThpP 3, $TMPS 
4762 025676 104151 1$: ERROR +151 
4768 025700 000424 YDONE 
4765 025702 YFLAG: .WORD 0 
4766 025704 000000 YIMP1: .WORD 0 
4767 025706 000000 YTMP2: .WORD 0 
4768 025710 000000 YIMP3: .WORD 0 
4770 025712 000000 YDATOO: .WORD 0 
4771 025714 000000 YDATO1: .WORD 0 
4772 025716 000000 YDATO2: .WORD 0 
477s 025720 000000 YDATO3: .WORD 0 
4775 025722 063146 YPATOO: .WORD 063146 
4776 025724 052525 YPATO1: .WORD 052525 
4777 025726 042104 YPATO2: .WORD 042104 
4778 025730 167356 YPATO3: .WORD 167356 
4780 025732 163146 YPAT10: .WORD 163146 
4781 025734 052525 YPAT11: .WORD 052525 
4782 025736 042104 YPAT12: .WORD 042104 
4785 025740 167356 YPAT13: .WORD 167356 
4785 025742 YPAT20: .WwORD 0 
4786 025744 000000 YPAT21: .WORD 0 
4787 025746 000000 VPAT22: .wORD 0 
4788 025750 000000 YPAT23: .wORD 0 
4790 025752 YDONE : 
025752 104413 RSE TUP :GO INITIALIZE THE F?S AND STACK; AND 


“SEE IF THt. USER HAS EXPRESSED 

STHE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
[THE USER TYPED CONTROL G?). 


SEQUENCE 


108 


-—_-- FC —_-- 


| 
| CKFPACO FPTIF FLTG PNT PRT A 
| TEST #@ 30 = ADDD WITH Ac=0 TES 


| 4799 
| 
| 
025754 000004 
4800 025756 005037 026212 
4801 025/62 012737 026230 
4802 025770 012737 000200 
4803 025776 
025776 012737 026004 
4 026 012700 000200 
4805 026010 170100 
4806 026012 012700 026250 
4807 C26016 172410 
4808 026020 013700 026214 
4809 026024 172010 
4810 026026 170205 


4812 G260 52 012700 @26220 


| 

| 

4814 026040 012702 000004 
| 


4815 026044 013701 026214 


0 a 
4820 026060 023705 026216 


4823 026070 005737 026212 


4825 026076 012737 177777 
4826 026104 012737 026240 
000210 


4831 026124 012737 026024 


835 026154 013737 026214 


4838 026166 

4839 026166 012737 026024 
4840 026174 010537 001240 
4841 026200 013737 026216 
4842 026206 1046153 

4843 026210 990423 

4844 


a a ee eee 


, = 
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026214 
026216 


001110 


026212 
026214 
026216 


001236 


001244 
001246 


001236 
001242 


.SBIT 

T*TES 
3a 
38° 


SEQUENCE 


L TEST # 30 = ADDD WITH AC=0 TEST 


bd RRR RAE RE REE AERER REET ARTE RAAAEERAEREREE RAE RE THREATENS 


ADDD WITH AC=0 TEST 


T 30 


41S 
JSi 


IS A TEST OF ADDD WITH AC=0. BOTH 
TIVE AND NEGATIVE FSRC°S ARE TRIED. 


= RRR ERA RARER AE ERE AARRARARERAATEAAAARAAAREREA HERE 


15130: 


1$: 


z2: 


73: 


74: 


75: 


76: 
ZERR1: 


ZJERR2: 


ZFLAG 
#Z7PATOO,ZTMP1 
#200,ZTMP2 


#1$,$LPERR 
#200,R0 


RO 
#ZPAT20,RO 
(20) ,ACO 
Z7TMP i ,RO 
(RO) ,ACO 
RS 


#Z7DATOO,R0 
ACO, (RO) 
#4,R2 
ZTMP1,R1 
(RO) +,(R1)+ 


76 

#-1,Z7FLAG 
PIPATIO, 7TMP1 
as. .ZTMP2 


Z 
ZDONE 


#72, $TMP2 
Z7TMP1,$TMP3 
HZPAT20,$TMP4 
#7DAT00, $TMP5 
Z7TMP1,$1MP6 
+152 

ZDONE 


#72, $TMP2 
R5,$TMP3 
7T™MP2,STMPS 


sP 


SET UP THE LOOP ON ERROR ADDRESS. 


‘;SET DOUBLE MODE 


sSET ACO=0 


TEST INSTRUCTION 


;GET RESULT 


RESULT CORRECT? 


3FPS CORRECT? 


FINISHED TEST? 


:DATA FAILURE 


109 


CKFPACO FPTTIF FLTG PNT PRT A 
TEST # 30 = ADDD wWifH AC=0 TEST 


026212 
026214 
026216 


026240 
026242 
026244 
026246 


C26250 
026252 
026254 
026256 


026260 
026260 


000600 
000000 
000060 
000000 
000000 
000000 
031463 
156735 
156735 
167356 
135673 
146314 
000000 
000900 
000000 
000000 


104413 
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ZFLAG: .WORD OQ 
Z7™™P1: .WORD 0 
Z™MP2: .WORD 0 
JDATOO: .WwORD 0 
ZDATO1: .WwORD 0 
ZDATO2: .WORD 0 
ZDATO3: .WORD 0 
ZPATOO: .WORD 031463 
ZPATO1: .WwORD 010421 
ZPATO2: .WORD 146314 
ZPATO3: .WORD 156735 
ZPAT'C: .WORD 156735 
ZPAT11: WORD 167356 
ZPATi2: .wORD 135673 
Z7PAT13: .WORD 146314 
ZPAT2O: .WORD 0 
ZPAT21: .WORD Q 
ZPAT22: .WORD 0 
ZPAT23: .WORD 0 

ZDONE : ’ 

RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


7SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


SE QUE NCE 


110 
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TEST @ 31 = ADDF & ADDD E(AC)=EC(FSRC) @ (But FT) TEST 
4879 .SBITL TEST # 31 = ADDF & ADDD EC(AC)=E(FSRC) & (BUT FT) TEST 


bd RRR AREER RARAEARERHERE RARER ER HEARERS AHA EAE 


TeTEST 31 ADDF & ADDD ECAC) =E(F SRO) & (BuT FT) TEST 
ie 


t* THIS IS & TEST OF THE ADD INSTRUCTION WITH THE 
"® OPERANDS HAVING EQUAL EXPONENTS. THE (BUF FT) 
-* FORK IN THE ROUND/TRUNK FLOWS IS ALSO TESTED. 

r e SRR EERE RARER ARETAEAAARRERHHAHORHERRARAAEH ERED eeneaee 


026262 000004 1$131: SCOPE 
4880 026264 AAI: 
026264 012737 026272 001116 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4881 026272 012700 003240 1$: V #3240,RO0 
4882 026276 170100 LDFPS RO ;SET FIV FIV FD AND FT 
4883 026300 012737 026660 000244 MOV #AAERRO,FPVECT ;IN CASE THE OVER/UNDER 
884 026306 012700 027236 MOV #AAPATO,RO : FLOWS IN TRAP WILL 
4886 026312 172410 LDD (RO) ,ACO ;SET UP ACO 
4887 026314 012737 026326 001236 MOV MAA2 ,STMP2 * OPERAND 
4888 626322 012700 027246 MOV #AAPAT1,RO 
6889 026326 172010 Aa?: ADDD (RO) ,ACO sTEST INSTRUCTION 
4890 ;SHUULD TRUNCATE 
4891 026330 012700 027226 AAS: MOV WAAL ATO,RO 
4892 026334 1/4010 STD ACO (RO) 3GET THE RESULT 
4893 026336 012701 027256 MOV #AAPAT2,R1 
000004 MOV #4 ,R2 
4895 026346 022021 AAG: CMP (RO)+, (R14 ; CORRECT? 
4896 026350 001414 BEQ AA7 
4897 026352 012700 027266 MOV #AAPAT3,RO sDID (BUT FT) FAIL 
4B°R 026356 012701 027226 MOV #AADATO,R1 
4 7% 926362 012702 000004 MOV #4,R 
4 926366 622021 AAS: CMP (RO)+,(R1)+ 
4901 026370 001401 BEQ AAG 
4902 0°$372 6 BR AAERR1 ;DAT.A ERROR 


4904 026376 000137 027002 


A.6- SOB R2,AAS 
AA?: SOB R2,AAG 


; (BUT FT) ERROR 


£906 : 
4907 :NOW TEST DOUBLE FLOATING ROUND MODE. 
4909 026404 AA10: 
026404 012737 026412 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4910 026412 012700 003200 1$: MOV #3200,R0 SSET FD FIV FIV. FT=0 
4911 026416 170100 LDFPS RO 
4912 026420 012700 027236 V #AAPATO,RO 
4973 026424 172410 LDD (RO) ,ACO sSET UP ACO OPERAND 
4914 026426 012737 026440 001236 MOV #AA11, $TMP2 
4915 026484 012700 027246 MOV #AAPAT1, 20 
4916 026440 172010 AA11 ADDD (RO) ACO sTEST INSTRUCTION 
491 “SHOULD ROUND 
012 AAI2: MOV #AADATO,RO 
1 STD ACO, (RO) 3GET THE RESULT 
0 MOV MAAPAT3,R1 
0 MOV #4 .>? 
0 AA13: CMP (RO) +, (R1)6 s CORRECT? 


4918 026442 700 027226 
4919 026446 174010 
4920 026450 012701 027266 
4921. 026454 012702 000004 
4922 026460 022021 
4923 026462 001425 
4924 026464 012700 027256 


AA2 
MOV @AAPAT2 RO iPfy (Bul FT) FAIL? 


‘hy FPIIF FLTG PNT PRT A 
D 


EST # 31 = AD 


4925 026470 


026664 
4977 026666 
4978 026670 
4979 026672 
4980 026676 


7 
MACRO M1113 28=MAR=-61 12:56 PAGE 69! 
F & ADDD E(AC)=ECF SRC) & (BUT FT) TEST 


#AADATO,R1 
#4 ,R2 
(RO>+,(R1)+ 
AAI7 
MAAPATS ,RO 
#AADATO.R1 
#4,R2 
(RO) +, (R1)+ 
R2, 
AAERRG 
LAA 
AAERRS 
2,AA13 


e 


AA16 

AAZRR3_ ; FLOWS? 
AA1S ;DATA ERROR 

; CONSTANT ERROR 


; (BUT FT) ERROR 


SEQUENCE 


WAS THE FLOATING 
; CONSTANT USED 

; INSTEAD OF THE 
;DOUBLE CONSTANT 
IN THE ROUND 


zNOW TEST ADDF WITH FT=0, ROUND MODE 


012701 027226 MOV 
012702 G00004 MOV 
022021 AAI4: CMP 
001413 BEQ 
012700 027276 MOV 
012701 027226 MOV 
012702 000006 MOV 
022021 AA1S: CMP 
001401 Bra 
000544 ila 
077204 AA16: SOB 
000546 BR 
077216 AAI?7: SOB 
000562 BR 
077230 AA20: SOB 
AA21: 
012737 026546 001110 MOV 
012700 003290 1$: Vv 
170100 LDFPS 
012700 027236 MOV 
172410 LDD 
1 SETF 
012737 026576 001236. MOV 
012700 027306 MOV 
172010 AA22: ADDF 
AA23: 
170011 SETD 
012700 027226 MOV 
174010 STD 
012701 027316 MOV 
012702 000002 MOV 
022021 AA2S: CMP 
001413 BEQ 
012700 027256 MOV 
012701 027226 MOV 
012702 000002 MOV 
022011 AA25: cmp 
001401 BEQ 
0005 34 rN 
077204 AA26: $0B 
000550 BR 
077216 AA27: S0B 
000137 027326 JMP 
;COME HERE JF A 
013700 0012%6 AAERRO: MOV 
005720 TST 
020016 CMP 
001402 BEQ 
000137 042066 sg JMP 





#1$,$LPERR 
#3200,R0 
RO 
#AAPATO,RO 
(RO) ,ACO 


#AA22 ,STMP2 


MAAPATS ,RO 
(RO) ,ACO 


#AADATO,RO 
ACO, (RO) 
MAAPAT6,R1 
#2,R2 
(RO) +, (R1)+4 
AA27 
MAAPAT2,RO 
MAADATO.R1 


#2,R2 
(RO) +, (R1) 
AA2 


;SET UP THE LOOP ON ees ADDRESS. 
sFIv=1, FIv=1 T=0 


;LOAD ACO OPERAND 
sENTER FLOATING MODE 


sTEST INSTRUCTION 
HOULD ROUND 


:RESET TO DOUBLE 
SGET THE RESULT 
S CORRECT? 


sWAS T 


; HE DOUBLE 
CONSTANT USED INSTEAD 
é OATING 


“DATA ERROR 
7 CONSTANT ERROR 


TRAP OCCURS TO 244, 


STMP2 RO 


osteo IF THE TRAP WAS 
sAT A TEST INSTRUCTION 
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| TEST # 31 = ADDF & ADDD E(AC)=E(FSRC) & (BUT FT) TEST 


| 4981 026676 170300 sTST RO :GET FEC 
4982 026700 020027 000010 CMP RO,#10 
4983 026704 001405 BEQ 208 ZOVERFLOW 
4984 026706 020027 000012 CMP RO,#12 
4985 926712 001410 BEQ 30$ s UNDERF L OW 
4986 026714 000766 BR 10$ 
4987 026716 026720 208 
4988 026720 011637 001236 20$: MOV (SP) ,STMP2 ;REPORT OVERFLOW ERROR 
4989 026724 022626 CMP (SP)+,(SP)+ 
4990 026726 104154 21$: ERROR #154 
4991 026730 000137 027326 25$: JMP AADONE 
4992 026734 011637 001236 30$: MOV (SP) ,STMP2 ;REPORT UNDERFLOW 
4993 026740 022626 CMP (SP)+, (SP) + * ERROR 
4994 026742 104155 31$: ERROR +155 
4995 026744 000771 BR 25$ 
4997 sADDD RESULT woay oe + 
4998 026746 012737 027256 001246 AAERR1: MOV AAPAT2,$TMP6 
4999 026754 012737 027236 001242 AAER10: MOV PAAPATO. $TMP4 
5000 626762 012737 027246 001240 MOV #AAPAT1 .$TMP3 
5001 026770 012737 027226 001244 MOV #AADATO.$IMP5 
5002 026776 104162 1$: ERROR +162 
5003 027000 000552 BR AADONE 
5004 027002 012737 027256 007246 *"AERR2: MOV HAAPAT2.$IMP6 -; (BUT FT) FAILED. 
5005 027010 012727 027236 001242 MOV WAAPATO.$TMPS 
. 5006 027016 012737 027246 001240 MOV HAAPAI 1. $TMP3 
5007 927024 012737 027226 001244 MOV #AADATO. $TMP5 
5008 027032 104156 1$: ERROR +156 
5009 027034 000534 BR AADONE 
5010 027036 012737 027266 001246 AAERR3: MOV #EAPAT3.$™MP6 DATA ERROR. 
5011 027044 000743 BR AAER10 
5012 027046 012737 027266 001246 AAERR4: MOV SAAPAT3,$1TMP6 ;BAD CONSTANT 
5013 027054 012737 (27236 001242 MOV HAAPATO.$TMP4 
5014 027062 12737 627246 001240 MOV #AAPAT1 .$TMP3 
5015 027070 012737 027226 001244 MOV HAADATO.$TMP5 
5016 027076 104160 1$: ERROR +160 
5017 027100 000512 RR AADONE 
5018 027102 012737 027266 001246 AAERRS: MOV HAAPAT3,$TMP6 —-; (BUT FT) FAILED. 
5019 027110 012737 027236 001242 MOV MAAPATO. $TMP4 
5020 927116 012737 027246 001240 MOV HAAPAT1.$TMP3 
5021 027124 012737 027226 001244 MOV MAADATO.$TMP5 
| 8052 037132 104157 1s ERROR +157 
5023 027134 000474 BR AADONE 
5024 027136 012737 027306 001240 AAERR6: MOV #AAPATS,$TMP3 — : FD=0 AND 
5025 027144 012737 027236 001242 MOV HAAPATO.$TMP4 DATA ERROR 
027152 012737 027226 001244 MOV #AADATO. $TMP5 
5027 027160 012737 927316 001246 MOV #AAPAT6. $TMP6 
$028 027166 104160 1$: ERROR +160 
5029 027170 000456 BR AADONE 
030 027172 012737 027305 001240 AAERR7: MOV HAAPATS,$TMP3—-: CONSTANT ERROR 
5071 027200 012737 027236 001242 MOV HAAPATO.$TMPG 
032 027206 012737 027226 001244 MOV M#AADATO.$TMP5 
503 027214 012737 027316 0012466 MOV HAAPAT6. $TMP6 
5034 027222 104161 1$: CRROR 161 
5035 027224 000440 BR 


5036 027226 000000 000000 000000 AADATO: .WORD 0.0.0.0 | 
5037 027236 000200 009000 000000 AAPATO: .WORD $80 0.0.0.0 


.-—_---—- -- ------ --- 


} 
| 
' 
i 
| 


—— 


CKFPACO FP1TF FLTG PNT PRT A 


TEST # 31 = ADDF & ADDD ECAC)=E(FSRO’ & 


5038 027246 
5039 027256 
7266 


000000 
000000 
000000 


000000 
000001 
000001 
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(BUT FT) TEST 


.WORD 200,0,0,1 
“WORD 400.0.0.0 
"wORD 400,0.0,1 
"wORD 400.0,100000,0 
“wORD 200,1.0,0 
RD 400.1.0.0 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


:SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 
SVIRTUAL CONSOLE SWITCH 3 andenen (HAS 
THE USER TYPED CONTROL G?) 


SEQUENCE 


114 


CK “yy FP17F FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 0 
TEST # 32 = ADDF & ADDD WITH ECAC) LESS THAN E(FSRC) TEST 


SEQUENCE 115 


ao | 


5055 _SBITL TEST # 32 = ADDF & ADDD WITH E(AC) LESS THAN E(FSRC) TEST 
LAMA eee KAKA KA RAKA Kee eteeAKeKeKKKeKeeAKeeKerAKKeKAKAAAAA sees | 
; TES} 32 ADDF & ADDD WITH E(AC) LESS THAN E(FSRC) TEST 
THIS I ATES? OF THE ADDD AND ADDF 
‘INSTRUCTIONS AND THE ALIGN AC ALGORITHM 
‘*FLOWS. THE CONSTANT (25 FOR FLOATING, 57 FOR 
; *DOUBLE) USED IS CHECKED. THEN SIMPLE 
*AND WORST CASE ALIGNMENT SITUATIONS ARE 
{ eTRIED. NOTE ECAC) IS LESS THEN E(FSRC) 
*® 
+: REE A ERE EAE EERE AERA EREEEEERREA AEE 
027330 000004 TST32: SCOPE 
5056 sEXPONENT DIFFERENCE=57=71 (OCT) FD=1 
5057 027332 (C1: 
27332 012737 027340 001110 MOV #1$,$LPERR ;SET UP THE LOOP 7 ERROR ADDRESS. 
5058 027340 012704 003200 1$: | MOV #3200,R ‘SET FIV,FIV, AND F 
5059 027344 170104 LDFPS 4 
5060 027346 012737 027366 001236 MOV #CC2,$TMP2 
5061 ©27354 012700 031014 MOV #CCPO,RO ;SET ACO OPERAND 
5062 027 172410 LDD (RO) ,ACO sACO 
5063 027362 012700 031034 MOV #CCP2,RO 
5064 027 172010 (C2: ADDD (RO) ,ACO ;TEST INSTRUCTION 
5065 027370 170205 STFPS RS ET FPS 
027372 012700 031004 MOV #CCDATO,RO “GET THE RESULT 
5067 027376 174010 STD ACO, (RO) 
5068 027400 012701 031034 MOV #CCP2,R1 zIS IT CORNECT 
5069 027404 012702 000004 MOV #4 ,R2 
5070 027410 022021 (C3: CMP (RO) +,(R1)+ 
5071 027412 001415 BEQ CC6 
5072 027414 012700 031004 MOV #CCDATO,RO :DID A BAD 
5073 027420 012701 031014 MOV #CCPO,R1 + CONSTANT (NOT 57) 
5074 027424 012702 000004 MOV #4,R2 *GET GENERATED 
5075 027430 022021 CC4: CMP (RO) +, (R1)+ ‘FOR THE ALIGNMENT 
5076 027432 001402 BEQ cc5 :FLOWS? 
5077 027434 137 030402 JMP CCER1 *DATA ERROR.D 
5078 027440 077205 . CCS: S0B R2,CC4 
5079 027442 137 030440 JMP CCER2 :BAD CONSTANT .D 
5080 927446 077220 (C6: SOB R2,CC3 
5081 027450 020405 CMP R4,RS5 zFPS CORRECT? 
5082 027452 001402 BEQ CC? 
5083 027454 000137 030346 JMP CCERO sBAD FPS 
5084 EXPONENT DIFFERENCE=56=70 (OCT) FD=1 
5085 027460 CC?: 
027460 012737 027466 001110 MOV #1$ SLPERR :SET UP THE L30P ON ERROR ADDRESS. 
5086 027466 012704 003200 $: V #32 3200, *SET FIV.FIV, AND FD 
5087 027472 170104 | DFPS 
5088 027474 012737 027514 001236 MOV #CCB $TMP2 
5089 027502 012700 031014 MOV #CCPO,RO :SET ACO OPERAND 
027506 172410 LDD (RU) ,ACO 
5091 027510 012700 031024 MOV #ccPi.RO -FSRC 
5092 027514 172010 CC8: ADDD (RO) ,ACO STEST INSTRUCTION 
5093 027516 170205 STFPS R “GET FPS 
027 012700 031004 MOV #CCDATO,RO ‘GET THE RESULT 
5095 027524 174010 STD ACO, (RO) 
5096 027526 012701 031104 MOY #CCP7,R1 s1S 117 CORRECT 
5097 027532 012702 000004 MOV #4,R2 





CKFPACO_FP11F FLTG PNT PRT A 
TEST # 32 = ADDF & ADDD WITH E(AC) LESS THAN E(FSRC) TEST 
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SEQUENCE 116 


CONSTANT (NOT 57) 
GET GENERATED 
;FOR THE AL 1 GNMENT 


;BAD CONSTANT .D 


:SET UP THE LOOP ON ERROR ADDRESS. 
:SET UP ACO OPERAND. 
:SET FIV.FIV. CLEAR FD. 


sFSRC 
;TEST INSTRUCTION 


;REENTER DOUBLE MOVE 
GET THE RESULT 


31S THE RESULT CORRECT? 


WAS A BAD CONSTANT 
USED (NOT 25) IN 
THE ALIGN FLOWS? 


;BAD CONSTANT F 


7SET UP THE LOOP ON ERROR ADDRESS. 
SET UP ACO OPERAND. 
SET FIV,FIV. CLEAR FD. 


sFSRC 
sTEST INSTRUCTION 


;REENTER DOUBLE MOVE 


5098 027536 022021 cco: CMP (RO) +, (R1)+ 
5099 027540 001415 BEQ (C12 
5100 027542 012700 031004 MOV #CCDATO,RO :DID A BAD 
5101 027546 012701 031024 MOV ’CCP1,RI 
5102 027552 012702 000004 MOV #4 R2 
5103 027556 022021 cc10: CMP <RO) +, (R1)+ 
5104 027560 001402 BEQ C11 FLOWS? 
5105 027562 000137 030476 JMP CCER3 SDATA ERROR.D 
5106 027566 077205 (C11: SOB R2,CC10 
5107 027570 000137 030514 MP CCERG 
5108 027574 077220 cc12:  $0B R2,CC9 
5109 027576 020405 CMP ORGS :FPS CORRECT? 
5110 027600 001402 BEQ cci3 
5111 027602 000137 030346 JMP CCERO sBAD FPS. 
5112 SEXPONENT DIFFERENCE=25=31 (OCT) FD=0 
5113 027606 (C13: 
027606 012737 027614 001110 MOV #1$,$LPERR 
5114 C27614 012737 027642 001236 18: MOV #CC14,$TMP2 
5115 027622 012700 031014 MOV #CCPO.RO 
5116 027626 172410 LDD (RO) ,ACO 
5117 027630 012704 003000 MOV #3000,R4 
5118 027634 170104 LDFPS 4 
5119 027636 012700 031074 MOV #CCP6,RO 
5120 027642 172010 CC14: ADDF (RO) ,ACO 
5121 027644 170205 STFPS RS 
5122 027646 170011 SETD 
5123 027650 012700 031004 MOV #CCDATO,RO 
5124 027654 174010 STD ACO, (RO 
5125 027656 012701 031074 MOV #CCP6,RI 
5126 027662 012702 000002 MOV #2,R2 
5127 0 022021 CC15: CMP (RO) +, (R1)+ 
5128 027670 001415 BEQ CC18 
5129 027672 012700 031004 MOV #CCDATO,RO 
£130 027676 012701 031044 MOV #CCP3,Ri 
5:31 der?702 012702 000002 MOV #2,R2 
$132 027706 022021 (C16: C (RO)+,(R1)+ 
5133 027710 001402 _ BEQ C(17 
5134 027712 000137 050552 JMP CCERS :DATA ERROR F 
5135 027716 077205 (C17: SOB R2,CC16 
5136 027720 000137 030606 MP 
5137 027724 077220 CC18: SOB R2,(C15 
5138 027726 020405 CMP , 
5139 027730 001402 BEQ cci9 
5140 027732 000137 030364 JMP CCER9O :BAD FP 
5141 ZEXPONENT DIFFERENC =24=30 (OCT) FD=0 
5142 027736 €C19: 
027736 %.2737 027744 001110 MOV #1$,S$LPERR 
5143 027744 012737 027772 001236 18: MOV #CC20,$TMP2 
5144 027752 012700 031044 MOV #CCP3._RO 
5145 027756 172410 LDD (RO) ACO 
5146 027760 012704 003000 v #3000 ,P4 
5147 027764 170104 LDFPS RS 
5148 027766 012700 031064 MOV #CCPS,RO 
5149 027772 172010 CC20: ADDF (RO) ,ACO 
5150 027774 170205 STFPS RS 
5151 027776 170011 SETD 
5152 630000 012700 © 77004 MOV #CCDATO,RO 


SGET THE RESULT 





oo eet 
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| TEST # 32 = ADDF & ADDD WITH E(AC) LESS THAN E(FSRC) TEST 

! 


5153 030004 174010 STD ACO, (RO) 
5154 03 012701 0631114 MOV #CCP10,R1 :1S THE RESLT CORRECT? 
5155 080012 012702 000002 MOV #2,R2 
5156 030016 022021 CC21: CMP (RO) +, (R1)+ 
5157 030020 001415 BEQ C024 
5158 030022 012700 031004 MOV #CCDATO,RO :WAS A BAD CONSTANT 
515S 030026 012701 031064 MOV #CCP5 RI “USED (NOT 25) IN 
5160 030032 012702 000002 MOV #2,R2 ‘THE ALIGN FLOWS? 
5161 030036 022021 cC22: CMP (RO) +, (R1)+ 
3:69 02A040 001402 BEQ CC23 
5103 030042 000137 030642 JMP CCER? :DATA ERROR F 
5164 030046 077205 (C23: SOB Re.0622 
5165 030050 000137 030660 MP ERB ;BAD CONSTANT F 
5166 030054 077220 (C24: SOB K2,(C21 
5167 030056 020405 CMP R4_RS 
5168 030060 001402 BEQ cc 25 
5169 030062 000137 030364 JMP CCER9O sBAD FPS. 
5170 SEXPONENT DIFFERENCE=1 FD=1 
5171 030066 CC25: 
C30066 012737 030074 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5172 030074 012704 003200 1$: MOV #3200,R4 ‘SET FIV,FIV, AND FD 
$173 030100 170104 LDFPS 4 
5174 030102 0612737 030122 001236 MOV #CC26,$TMP2 
E175 030110 012700 031014 MOV #CCPO,RO :SET ACO OPERAND 
5176 030114 172410 LDD (RO) ,ACO 
5177 030116 012700 031044 MOV #CCP3,R0 sFSRC 
5178 030122 172010 (C26: ADDD  (RO),ACO ‘TEST INSTRUCTION 
5179 030124 170205 STFPS RS “GET FPS 
5180 030126 012700 03104 MOV #CCDATO,RO :GET THE RESULT 
5181 030132 174010 STD ACO, (RO) 
5182 030134 012701 031124 MOV #CCP11,R1 :1S IT CORRECT 
5183 030140 012702 000004 MOV #4 ,R2 
5184 030144 022021 (C27: CMP (RO) +, (R1)+ 
5185 030146 001415 BEQ CC $0 
5186 030150 012700 031004 MOV #CCDATO,RO :DID A BAD 
5187 030154 012701 031044 MOV #CCP3,R1 : CONSTANT (NOT 57) 
5188 030160 012702 000004 MOV #4 R2 “GET GCNERATED 
5189 030164 022021 CC28: CMP (RO)+, (R1)+ ‘FOR THE ALIGNMENT 
519C 030166 001402 BEQ CC29 FLOWS? 
5191 030170 000137 030714 JMP CCER10 “DATA ERROR.D 
5192 030174 077205 (C29: SOB R2,CC28 
5193 030176 000137 030732 MP CCER11 :BAD CONSTANT .D 
5194 030202 077220 cc30: SOB R2,CC27 
5195 030204 020405 CMP R4_RS :FPS CORRECT? 
5196 030206 001402 BEQ cr 31 
5197 030210 000137 030346 JMP (: ERO :BAD FPS. 
5198 SEXPONENT DIFFERENCE=100=144 (OCT) FD=1 
5199 030214 (C31: 
030214 012737 030222 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
200 030222 012704 003200 1$: V #3200,R4 ‘SET FIV.FIV, AND FD 
5201 030226 170104 LDFPS = RG 
5202 C30230 012737 030250 001236 MOV #CC32,$TMP2 
5203 030236 012700 031014 MOV #CCPO.RO :SET ACO OPERAND 
5204 030242 172410 LDD (RO) ,ACO 
5205 030244 012700 031054 MOV #CCPS RO :F SRC 
$206 030250 172010 CC32: ADMD (RO), ACO ‘TEST INSTRUCTION 
5207 030252 170205 STFPS RS :GET FPS 
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WITH ECAC) LESS THAN E(FSRO) TEST 


031004 
031054 
900004 


931004 
031054 
000004 


930750 
030766 


030346 


031144 
001242 
001240 


031144 
031034 


031144 
031024 
031104 


031024 


1074 
7 
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001244 


001240 
001246 
001242 
001244 


001240 
001246 


001240 
001246 
001242 


C33: 


C34: 


cc35: 
CC 36: 


(C37: 
CCERO: 


1$: 


CCER9O: 


1$: 
CCER1: 


CCERSO: 


1$: 
CCER2: 


CCER2Z2: 


1$: 
CCER3: 


CCER4: 


CCERG4: 


1$: 
CCERS: 


CCERSS: 


1$: 
CCER6: 


#CCDATO,RO 
ACO, (RO) 
#CCP4,R1 


#4,R2 
(RO)+,(R1)¢ 


¥ 
#CCDATO,RO 
#CCP4,Ri 


#4 ,R2 
i, egal 


CCDONE 
#CCP2,$TMP3 
#CCP2,$TMP6 
#CCPO,STMPS 
#CCDATO,STMPS 
+166 

CCDONE 
#CCP2,$TMP3 
#CCP2,$TMP6 
#CCPO,S$TMP4 
#CCDATO,STMP5 
+172 


CCDONE 
#CCP1,$TMP3 
#CCP7_$TMP6 
CCERSO 
#CCP1,$TMP3 
#CCP7.STMP6 
#CCPO.$TMP4 
#CCDATO,$TMPS 
+173 

CCDONE 
#CCP6,$TMP3 
#CCP6,$TMPE 
#CCPO.$TMP4 
#CCDATO, $TMPS 


+170 

CCDONE 
#CCP6,STMPS 
#CCP6,$TMP6 
#CCPO,$TMP4 


St WUENCE 


GET THE RESULT 
31S IT CORRECT 


:DID A 


BAD 
CONSTANT (NOT 57) 
[GET GENERATED 
aon THE ALIGNMENT 


FLOWS? 
“DATA ERROR.D 


;BAD CONSTANT.D 
FPS CORRECT? 
BAD FPS. 

;FPS ERROR D 


3FPS ERROR F 


;DATA ERROR D 


; CONSTANT BAD D(B) 


; CONSTANT BAD D(G) 


DATA ERROR F 


; CONSTANT BAD F (B) 


118 


c———— SS 
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| CKFPACO FP11F FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAG 50-4 


TEST # 32 = ADDF & ADDD WITH E(AC) LESS THAN E(FSRC) TEST 
1 


| 
| 5265 030630 012737 031004 001244 MOV ACCDATO,STMP5 
5266 030636 106174 1$ ERROR +174 
$267 030640 000541 BR CCDONE 
5268 030642 012737 031064 001240 CCER7: MOV ACCPS, STMP3 
030650 0127387 037114 001246 MOV #CCP10, $TMP6 
5270 030656 000743 BR CCERSS 
§271 0% 012737 031064 001240 CCER8: MOV #CCP5,STMP3 
5272 C3 012737. 031114 001246 MOV #CCP10,$1MP6 
5273 030674 012737 0310046 001244 MOV @CCDATO,$TMP5 
5276 030702 012737 031014 601242 MOV #CZPO,$TMPG 
5275 030710 104175 1$: ERROR +175 
5276 030712 000514 BR CCDONE 
5577 020714 012737 0310446 0012460 CCER1O: MOV #CCP3,$TMP3 
5278 030722 012737 031124 001246 MOV #CCP11,$TMP6 
5279 030730 000632 BR CCERSO 
5280 030732 012737 031044 001240 CCER11: MOV ACCP3,$TMP3 
5281 030740 012737 031124 001246 MOV #CCP11,$TMP6 
| 5282 030746 000670 BR CCERGG 
5283 030750 012737 031054 001240 CCER12: MOV #CCP4,STMP3 
- 6384 €30756 012737 031054 001246 MOV #CCP4.$TMPO 
5285 030764 000614 ER CCERSO 
5286 030766 012737 031054 001240 CCER13: MOV #CCP4,STMP3 
5287 030774 012737 031054 001246 MOV #CCP4.STMP6 
5288 031002 000624 BR CCER22 
5289 031004 000000 000000 000000 CCDATO: .wOFD 0,0,0,0 
5290 031014 000200 000000 000000 CCPO: .WORD 200,0,0.0 
5291 031024 016200 000000 000000 CCP1: . WORD 16200,0,0.0 
5292 34 016400 000000 000000 CCF2: .WORD 16400.0,0.0 
5293 031044 000000 000000 CCP3 wORD 400,0.0.0 
&394 031054 031200 000000 CCP4 "wORD  31200,0,0,0 
5295 031064 006 000000 CCPS5 WORD 00,0.6,0 
5296 031074 000000 000000 CCP6 WORD  6400,0.0,0 
5297 031104 016200 000000 000000 CcCP7: <:wORD 16200,0,0,1 
5298 031114 000007 000000 CCP10: WORD 6200,1,0,0 
5299 031124 000500 000000 000000 CCP11: WORD 500,0,0,0 
5300 031134 000200 000600 000000 CCP12: .wORD 200,0,0,0 
$301 031144 CCDONE: 
031144 104413 RSE TUP 
5302 


SEQUENCE 


DATA ERROR F 


3s CONSTANT BAD F (G) 


DATA ERROR D 


7 CONSTANT BAD D(G) 


;DATA ERROR D 


CONSTANT BAD D(B) 


3E(AC)=1 

7E(FSRC)=E (AC) +56=57 
7E(FSRC)=E (AC) +57=58 
7E(FSRC)=E (AC) +1=2 

7E (CF SRC) =E (AC) +100=101=145(0CT) 
7E (CF SRC) =E (AC) +24=25=31(0CT) 

7E (F SRC) =E (AC) +25=26=32(0CT) 
3CCP1 RES 

:CCP5 RES 


RES 
;BAD CONSTANT ;RES CCP2,0CCP4 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOf TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


119 
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CKFPACO FPI11F FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 51 SEQUENCE 
TEST # 33 = ADDF & ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


5313 .SBITL TEST # 33 = ADDF & ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


nd RR REE ERARE ARERR EE ERER EERE EAA AEEEREREEETARAER EE RAEERAEER EEE 


SeTEST 33 ADDF & ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


® 

s*THIS IS A TEST OF THE ADDD AND ADDF 
z*INSTRUCTIONS AND THE ALIGN FSRC ALGORITHM 
z*FLOWS. FIRST THE CONSTANT USED IS CHECKED. 
7*THEN SIMPLE AND WORST CASE ALIGNMENT 
:*SITUATIONS ARE TRIED. NOTE ECAC) 

7*I1S GREATER THAN C(FSRC). 


° 
° RARER EERE RAE EERE EEE ARERR ERATE AERER ERE ER 


| 

031146 000004 1S133: SCOPE 
5314 EXPONENT DIFFERENCE=57=71 (OCT) FD=1 
$315 031150 B51: 

031150 012737 031156 001110 MOV #1$,$LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
5316 031156 012704 003200 1$: MOV #3200,R4 “SET FIV FIV, AND FD 
$317 031162 170104 LDFPS RG 
$318 031164 012737 032036 000244 MOV WBRBERO,FPVECT  ;SET UP FOR ERROR 
$319 631172 012737 031212 001236 MOV #BB2,$TMP2 [IN CASE THE OVER\ 
$320 SUNDER FLOWS FAIL. 
5321 031200 012700 032400 MOV #BBPAT2,RO *SET ACO OPERAND. 
$322 031204 172410 LDD (RO) ,ACO 

233 031 012700 032370 MOV #BBPAT1,RO :F SRC 

5326 031212 172010 BR: ADCDv (RO) ,ACO s TEST INSTRUCTION 
5325 031214 170205 STFPS RS 

5326 031216 012700 032350 BB3: MOV #BBDATO,RO :GET THE RESULT 
$327 031222 174010 STD ACO, (RO) 

5328 031224 012701 032400 MOV #BBPAT2,R1 sRESULT CORRECT? 
5329 031230 012702 900004 MOV #4 R2 

5330 031234 22021 BBS: CMP (RO) +, (R1)4 

533: 031236 001402 BEQ BB5 

5332 031240 000137 032076 JME BRER1 :DATA ERROR D 
5333 031244 077205 BRS : SOB R2,BB4 

5334 sWAS FPS CORRECT? 
5335 031246 020405 CMP R4 RS 

5336 031250 001402 BEO BRE 

5337 031252 000137 032036 JMP BRERO :FPS ERROR 

5338 EXPONENT DIFFERENCE=56=70 (OCT) FD=1 

5339 031256 BBE: 

031256 012737 031264 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5340 031264 012704 003200 1$: MOV #3200,R4 “SET FIV,FIV, AND FD 
$341 031270 170104 LDFPS RG 
5342 031272 012737 031312 001236 MOV #BB7, STMP2 
5343 031300 012700 032420 MOV #BBPAT4 RO :SET ACO OPERAND 
5344 031304 172410 LDD (RO) , AC 
5345 031306 012700 032370 MOV #BBPAT1,RO F SRC 
5346 031312 172010 BB?: ADDD (RO) ACO “TEST INSTRUCTION 
5347 031314 170205 STFPS RS “GET FPS 
5348 031316 012700 032350 MOV #BBDATO,RO “GET THE RESULT 
5349 031322 174010 STD ACO, (RO) 

5350 031324 012701 032460 MOV #BBP10,R1 r1S IT CORRECT 
5351 031330 012702 000004 MOV #4 .R2 

5352 031334 022021 BB10: CMP (RO)+, (R14 

5253 031336 001415 BEO BB13 

5%54 031340 012700 032350 MOV #BBDATO,RO :DID A BAD 

5355 031344 012701 032420 MOV #BRPATS_R1 STONSTANT (NOT 57) 


—— 


120 


| ‘wy FPI1F FLTG PNT PRT A 
| St # 33 ~ ADDF & ADDD wits — (AC) 


; 


' 
| 


i 


328 031350 
358 031356 
359 031360 


5366 

5307 031404 
031404 

5368 031412 

5369 031420 

5370 031424 

5371 031426 


031432 


2398 031544 


5401 031554 
5402 031556 
5403 031562 


itd 031610 


Eas 


012702 


-012737 


000006 


032134 
032152 


032036 


031412 
031440 
032360 


003000 


032370 


032350 


032360 
000002 


032350 


032450 
000002 


032350 
032410 
000002 


10 
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GREATER THAN E(FSRC) TEST 


@R11: (MP (RE), (R16 
BEQ B7 2 
J BEER? 
BB12: SOB R2 BB: 
IMP BRER3 
8812: SOB R2,8810 
CMP R4-RS 
BE 9 BBi4 
BBC 


RO ;BAD 
gEXPONENT MDIFFERENCE= 25=31 (OCT) FD= * ps 


MOV #1$,$LPERR 


1$: MOV #8R15,$TMP2 
MOV #RBPATO,RO 
LDD (RO) ACO 
MOV #3000, R4 
LDFPS 
MOV TEAPATI RO 
BB15: ADDF (R0) ,ACO 
STFPS RS 
SETD 
MOV #BBDATO,RO 


STD ACO, (RO) 
MOV ro ti 


MOV #2,R 

BB16: CMP se | lh 
BEQ BB17 
JMe BBERS 

BB17: $08 R2,BB16 
CMP R45 
BEG BB20 


JMP BBER10 
sEXPONENT DIFFERENCE=24=30 (OCT) 
BB20: 


MOV #1$, ST ateee 


1$: MOV #BP21,$TMP 
MOV #RBEAT3,RO 
LDD (RO) ACO 
MOV #3000, RS 
LDFPS 
MOV saapati. RO 

BB21: ADDF 7RO) ACO 
STFPS RS 
SETD 
MOV #BBDATO,RO 
STD ACO, (RO) 
MOV #BBP7R1 

MOV #2, Re 

BB22: CMP (RO) +, (R1)+ 
BEQ BB25 
MOV #BRDATO,RO 
MOV #RBRPAT3_RI 
MOV #2,R2 

BB23: . CMP (RO)+, (R1)+ 
BEO 24 


SEWIENCE 121 


GET GENERATED 
he THE ALIGNMENT 


FLOWS? 
“DATA ERROR .D 


;BAD CONSTANT .D 
FPS CORRECT? 


SET UP THE LOOP ON ERRO® ADDRESS. 


SET UP ACO OPERAND 


; SET oF AND FIV 
ZCLEAR FD 


sF SRC 
sTEST INSTRUCTION 


sREENTED DOUBLE MODE. 
;GET THE RESULT 


af 
ORRECT? 


;DATA ERROR F 
71S FPS CORRECT? 
FPS ERROR. 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP ACO OPERAND. 
SET FIU,FIV. CLEAR FD. 


sF SRC 
sTEST INSTRUCTION 


sREENTER DOUBLE MODE 
GET THE RESULT 


71S THE RESULT CORRECT? 


WAS A BAD CONSTANT 
z USED (NOT 25) IN 
;THE ALLIGN FLOWS? 


 CKFPACO FRTIF FLTG PNT PRT A 


—— 


5411 


031612 


031626 
031630 
031632 


032050 


000137 


032242 
032260 


032056 


031644 
031672 
003200 
032430 


032370 


032350 
032470 
000004 


032314 


032036 


031744 
031772 
003200 
032440 


032370 


032350 


032440 
000004 


032332 © 


001240 
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TEST # 33 = ADDF & ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


BB24: 
BBS: 


1$: 


BB2?7: 


1$: 


BRERO: 


JMP BRERS 

SOB R2,RB23 

JMP ER6 

S08 R2 ,RB22 

CMP R4,RS 

BEG BR26 

JMP BRERT0 
sEMPONENT DIF FERENCE=1 
8826: 

MOV #13, $LPERR 

MOV #BB27 , STMP2 

MOV #3200,R6 

LDFPS 84 

MOV #BBPATS RO 

LDD (RO), ACO 

MOV #RBBPAT1,RO 

ADDD (RO), ACO 

STFPS RS 

MOV #BRBDATO,RO 

STD ACO, (RO) 

MOV 17,R1 

MOV #4 ,R2 

CMP (RO) +, (R1)¢ 

BEQ 8831 

JMP BRER7 

SOR R2,RB3C 

CMP RGRS 

BEO BB32 

JMP BRERO 
sEMPONENT DIFFERENCE=100=144 (OCT) 
B32: 

MOV #1$, S$ LPERR 

MOV #8R33,$TMP2 

MOV #3200,R4 

LDFPS RG 

MOV #BRPAT6,RO 

LDD (RO), ACO 

MOV #BRBPAT1 RO 

ADLD RO) ACO 

STFPS RS 

MOV #BBDATO,RO 

STD ACO, (RO) 

MOV #BRBPAT6,R1 

MOV #4 Re 

CMP (RO)+,(R1)¢ 

BEQ BB35 

JMP BRERB 

SOB R2,RB34 

CMP R4,RS 

BNE BRERO 

JMP BRBDONE 

MOV R4,STMPS 

MOV RS, STMPS 

ERROR +164 

RSE TUP 


SEQUENCE 122 
;DATA ERROR F 
sRBAD CONSTANT F 
sBAD FPS. 
sSET UP THE LOOP ON ERROR ADDRESS. 


SET UP ACO OPERAND \ 


\ 


TC ; \ 
sTEST INSTRUCTION 


| 
j 
| 
| 

:GET THE RESULT. ' 

Z1S 17 CORRECT? 

:DATA ERROR D 

:1S FPS CORRECT 


.SET UP TME LOOP ON ERROR ADDRESS. 


sSET F.V.FIV AND FD 
;SET UP ACO OPERAND. 
ZF SRC 

zTEST INSTRUCTION 
sGET THE RESULT 

:1S IT CORRECT 


;DATA ERROR D 
31S FPS CORRECT 
FPS ERROR D 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
ZTHE DESIRE TO CHANGE THE SOF TWARE 


G 10 
CRFRACO FRITF F.TG PNT PRY & MACRO M1113 28-MAR=81 12: 2 PAGE 51-3 
rest #@ 33 = ADDF é A™DD with —(AC) GREATES THAN EC(FSRO) TES 


SE QUE NCE 


VIRTUAL CONSOLE SWITCH ee (HAS 
;THE USER TYPED CONTROL G?) 


5464 032052 000137 032500 MP BRD ONE 
$465 032056 010437 001242 BRERTO: MOV RG, $TMPG ZFPS ERROR F 
5466 932062 070537 001240 MOV RS-$ IMPS 
5467 032066 104165 '$: ERROR +165 
5468 032070 106413 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 
“THE DESIRE TO CHANGE THE SOF TWARE 
TVIRTUAL CONSOLE SWITCH PEGISTER (HAS 
STHE USER TYPED CONTROL G?). 
5469 032072 000137 032500 IMP BRDONF 
| 6470 032076 012737 032600 0012462 BHERT: MOV #BBPAT2,$TMP4 DATA ERROR D 
5471 032106 012737 032600 001246 MOV #BAPATO.$TMP6 
5472 032112 012737 032370 001240 SBERT1: MOV #BRPAT1_$IMP3 
5473 032120 012737 032350 0012464 MOV #BBDATO. $TMPS 
E476 032126 104166 1$: FRROR +166 
5475 032130 000137 032500 IMP BRDONE 
| 5476 032134 012737 032420 0012462 BBER2: MOV #BRPATS ,STMPS 
| 5477 632142 012737 032460 001246 MOV #8RP10,$TMP6 
5478 032150 000760 BR BRER11 
5479 032152 012737 032420 001242 BRER3: MOV #BBPATG,$T™MP4 BAD CONSTANT D 
5480 032160 012737 032460 001246 MOV + 3BP10, $TMP6 
5481 032166 012737 032370 001240 MOV #BRPATI .$TMP2 
5482 032174 012737 032350 001244 MOV #BRDATO.$TMP5 
5483 032202 104167 ; 1$: ERROR +167 
5484 032206 000535 BR BBDONE 
5485 032206 012737 032360 001242 SBERS: MOV #BRPATO.$TMP4  ;DATA ERROR F 
5486 032216 012737 032360 001246 MOV #8RP’.T0.$TMP6 
5487 032222 012737 032370 0C1240 BBERSO: MOV #RAPAT1_$TMP3 
5488 032230 012737 032350 001264 MOV #BADATO.$TMPS 
5489 032236 104170 1$: ERROR +170 
5490 032240 00051 BR BBDONE 
5491 032242 012737 032410 001242 B8BERS: MOV #RBPAT3,$TMP4 
5492 032250 012737 032450 001246 MOV #RBP7.$TMP6 
5493 032256 761 , BR BRER4 
5494 032260 012737 032410 001242 BBER6: MOV #BBPATS3,$TMP4 =; LONSTANT ERROR F 
5495 032266 012737 032450 001246 MOV #BBP7 ,$TMP6 
5496 032274 012737 032370 001240 MOV #RBPAT!.$TMPS 
5497 032302 012737 032350 001244 MOV #BBDATO.$TMP5 
5498 032310 171 1$: ERROR +171 
5499 032312 72 BR BRDONE 
5500 03231. 012737 032430 001242 BBER7: MOV ABBPATS ,STMP4 
5501 022322 012737 032370 001246 MOV #BBPAT11.$™MP6 
5502 032330 ? BR BBER11 
5503 032832 012737 032640 (01242 BBER8: MOV #BBPAT6, STMP4 
5504 33¢240 0127387 032440 0012466 MOV #BBPAT6.$TMP6 
5505 03234 1 BR BBER11 
EF 6 032350 000000 000000 BRBDATO: .wORD 0,0,0,0 
5507 032 006400 000000 000000 BaPATO: .wORD  6400,¢,0,6 =F (AC) =E (F SRO) #25=26=32(0CT) 
5508 032370 000290 000000 BBPAT1: .wORD  200,0,0,6 TE CFSRC)=1 
- §509 032400 016400 000000 000 BBPAT2: .WORD 16460, 0,0,0 SE (AC) =E (F SRC) #57=58=72 (007) 
5510 032610 200 000 000000 BBPAT3: . WORD 0,0,0,60 “E (AC) =E (F SRO) #24=25=31(0CT) 
5511 032420 016200 000000 000000 BBPAT4: .WORD 16206. 6.6.9 ECAC) =E (F SRO) +365 §7=71(0CT) 
5512 0324 BBPATS: WORD 050.0 SE (AC) =E (F SRO) 
$513 032640 031200 900000 000090 BBPAT6: .wORD 31900, 0;0,0 ECAC) =E (FSR AE) 310021012165 (0CT) 
5514 032450 200 000001 000000 8BP7: WORD 0,1,6,6 *BBPAT3 RES 


—---- -- — 


H 10 
CKREPACO FR" TF FLTG PNT PRT F. MACRO M1113 2B-MAR=-B81 12:56 PAGE 51-4 SEQUENCE 124 
TES’ @ 33 = ADDF @ ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


5515 032469 016200 000000 OO000C BRO"O: .wOer 16200,0.0,3 jBBPATS RES 


£576 032470 000500 CQ0000 000000 8B i: .mwuR  500,0,0.0 ;BBPATS RES 
5517 032500 BADONE : 
032500 104418 RSE TUP 7GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
>THE USER TYPED CONTROL G?). 


1 10 
CKFPACO FRTTF FLTG PNT PRT & MACRO M1113 28=MAR=81 12:56 PAGE 52 SEQUENCE 125 
TEST # 34 = ADDD wilh NEGATVE OPRANDS TEST 


| $525 LSRITL TEST # 346 = ADDD wITH NEGATVE OPRANDS TEST 

' fs Vee eteeenseneeeraeaggeeeeaanaganaggagearareaenaneananenaragenneees 
SeTEST 34 ADDD WITH NEUATVE OPRANDS TEST 

teTHIS IS A TEST OF THE ADDD INSTRUCTION 

| Sew!TH NEGATIVE OPERANDS. EVERY COMBINATION OF 

SeOPERAND SIGNS IS TRIED. 

; Fs nestebintitnen een meena ee eennetiteanneeennnenmeens 

! 


032502 000006 +5734: SCOPE 
_ sBO7H OPERANDS NEGATIVE 
5527 032504 D1: 

- 032504 012737 032512 001110 MOV #1$,$\ PERR ;SET UP THE LOOP ON ERROR ADDRESS. 
5528 032512 012706 003200 1$: MOV #3200, :SET FIO, FIV, AND FD 
5529 032516 170106 LDFPS RG 
5530 032520 012737 032550 0012%6 MOV #0D2, $TMP2 
$531 032526 012700 034420 MOV #DDP4 RO :SET ACO CPEPAND 
5532 032532 172610 LDD (RO), "kee 
§533 032534 012700 034420 MOV #ppP? RO ZESRC 
5534 632540 172010 DD2: ADDD (RO), ACO TEST INSTRUCTION 
5535 032542 170205 STEPS) RS TGET FPS 

— §536 032544 012700 034400 MOV #DDDATO,RO GET THE RESULT 
5537 032550 174601) STD ATC, (ROS 
5538 032552 0127C1 36520 MOV #vDP9_RI Z1S IT CORRECT 
5539 032556 012762 000006 MOV #4 Re 
$540 032562 022027 DD3: cM (RO)*, (RI) 6 
5541 025564 001415 BEQ DD6 
5542 032566 012700 034400 MOV #DDDATO,RO :DID A ADD=SUB 
5543 032572 %12701 034450 MOV #DDP4 Ri [FLOW A FAILURE 
5544 032576 012702 000004 MOV #4 R2 
5545 032602 022021 DDS: CMP (FD)+, (R1)« 
5546 032604 001402 BEC ops £216,442, 500 
5547 032606 000137 033630 MP DDERI “DATA ERROR,D 
5548 032612 077205 ODS: 508 R2, DDG 
5549 032614 000137 033666 IMP DDERZ :FLOW FAILURE ,D 
5550 032620 077220 Db6: SOB R2,DD3 
5551 032622 052704 000010 BIS #10,R4 - 
5552 032626 020405 CMP R4_RS ZFPS CORRECT? 
5553 032630 001402 BEG DD? 
5554 032632 000137 933612 JMP DDERO sRAD.FPS 
5555 340 POS FSRC NEG AC==-F SRC 
5556 032636 bp?: 

032636 012737 032644 001110 MOV #1$ — zSET UP THE LOOP ON ERROR Bes. 
5557 032644 012704 003200 $ v #3200, :SET FIO, FIV, AND FD 
5558 032650 170104 LDFPS = RG 
5559 032652 012737 032672 001236 MOV #0D8,$TMP2 
5560 032660 012700 034430 MOV #DDP2 RO :SET ACO CPERAND 
5561 032664 172410 - LD (RO) ACO 
5562 032666 012700 034420 MOV #DDP1 RO ZF SPC 
5563 03267 172010 DDS:  aDDD (RO), ACO TEST INSTRUCT ION 
5564 032674 170205 STEPS RS GET FPS 
5565 032676 012700 034409 MOv #DDDATO, RO GET THE RESULT 
55€6 032702 174010 STD ACO, (RO) 

5567 032704 012701 034410 MOV #DDPO,R1 s1S IT CORRECT 
5568 032710 012702 000 OA MOV #4 R2 

5569 032714 022021 pp10: (MP (RO) *, (R1)° 

6570 032716 001402 BE OQ Dp11 





| CRFPACO FPITF FLIG PNT PRT A 


\EST #@ 34 = ADDD WITH NEGATVE OPRANDS TES 
5571 032720 000137 033724 
000004 


5576 032736 033612 

5577 

5578 032742 
032742 

5579 032750 

5580 032754 


5581 032756 


0 001110 
0 
1 
0 
32764 y 
0 
1 
1 


37 032750 
003°00 


001236 
00 034420 


700 034430 


7 

f 

737 032776 
5582 0 7 
5583 032770 o 


034400 
034410 
000004 
033762 
000004 


033672 
37 033054 


003200 


7 033102 
hs 034440 


034470 


001110 


001236 


yv) 

See aRS 

nN 

=) Oo 

w Ww 

& & 
— 309-00 -0C 


2700 034400 
034500 
009004 


7 
alojl =e) 


— — = 


034400 
034510 
00CONG 


ek ek ek ed ed od od od 
DWNAWUS WMO 
oOo°0o°o 

q 

ie 

— 

™N 

Oo 


9 033146 


SRLEKRFTSSS 
S 
SERSES 
elolej=) 


034020 
034056 


DD11: 


JMP 
3AC_NEG FSRC POS 


Die: 


1$: 


DD13: 


DD14: 


DD15: 


3AC0 


DD16: 


1$: 


DD17: 


DD18: 


DD19: 


DD20: 
DD21: 


POC 
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MACRO LEAR, 28-MAR=81 12:56 PAGE 52-1 


#1%,Si.PERR 
#3200,R4 


RS 
#0D13,$TMP2 


RS 
#DDDATO,RO 
ACO, (RO) 
5 R} 


Re 
(nO). (R1)¢ 


FSRC NEG 


#1$,$.PERR 
#5200, R4 


aD017, STMP2 
#DDP3,RO 
(RO) ,ACO 
#DDP6,RO 
(RO) ,ACO 


#DDDATO,RO 
ACO, (RO) 
#DDP7,R1 
#4,R2 
(R6)+,(R1)¢ 
DD21 
#DDDATO,RO 
#DDPB,R1 


#4 ,R2 
(RO) +, (R11) 
DD 


Pe] 
Ww 


SEQUENCE 
FLOW FAILURE 
sFPS CORRECT? 


;BAL FPS 
AC==F SRO 


SET UP THE LOOP ON ERROR ADDRESS. 
3SET Flu, FIV, AND FD 
SET ACO OPERAND 


Tes INSTRUCTION 
;GET FPS 
;GET THE RESULT 
:1S IT CORRECT 
zFLOW FAILURE 216,440,121 
EPS CORRECT? 
;BAD FPS 
JAC/ > /FSRC/ 
SET UP THE LOOP ON ERROR ADDRESS. 
SET FIV, FIV AND FD 
SET ACO OPERAND 
7 ESPC 
ZTEST INSTRUCTION 
GET FPS 
GET THE RESULT 
31S IT CORRECT 


zFLOWS FAILURE 
3216,440,101 
GET GENERATED 


DATA ERROR. 


EPS CORRECT? 


126 


ee eeeeeEeEEeEEEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeE=E=~EEeeeeeeeeeeEeeEeeEeEeEeEeeeeeeeeeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeEee—EeeEeEeEEEEEEEE 


c--- --— --—— -_—__-—— eee 
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TEST #@ 36 = ADDD WITH NEGATVE OPRANDS TES 


5626 033170 000137 032612 JMP DDERO sBAD FPS 

5627 sAC NEG FSRC POS /FSRC/ > /AC/ 

5628 033174 bD22: 
033174 012737 033202 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
|  —- §629 O33505 012704 003200 1$: MOV #3 3200,R4 SET FIO,FIV, AND FD 
5630 033206 170104 LDFPS 

5631 033210 012737 033230 001236 MOV #0023, $TMP2 

5632 033216 012700 034470 MOV #DDP6.RO :SET ACO OPERAND 

$633 033222 172410 LDD (RO) ACO 

34 033224 012700 034440 MOV #DDP3,RO SPC 

5635 033230 172010 DD23:  ADDD  (RO),ACO Pres INSTRUCTION 

5636 033232 170205 STEPS RS TGET FPS 

5637 033234 012700 034400 MOV #DDDATO,RO sGET THE RESULT 

5638 033240 174010 STD ACO, (RO) 

5639 033242 012701 034500 MOV #DDP7,R1 sIS IT CORRECT? 

5640 033246 912702 000006 MOV #4 R2 

5641 033252 22021 DD246: CMP (RO)+,(R1)¢ 

5642 033254 001415 BEQ DD27 

5643 033256 012700 034400 MOV #DDDATO,RO ZFLO.S FAILURE 

5644 033262 012701 034510 MOV #DDPS,R1 :CONSTANT (NOT 57) 

5645 033266 012702 000004 MOV #4 ,R2 +216,042,101 

5646 033272 021011 DD25: CMP (RO), (R1) 

5647 033274 001402 BEQ DD26 

5648 033276 000137 034114 JMP DDER7 ;DATA ERROR. 

5649 033302 077205 DD26: SOB R2,DD25 

5650 033304 000137 034152 JMP DDERB 

5651 033310 077220 DD27: SOB R2,DD24 

5652 033312 020405 CMP R4_RS :FPS CORRECT? 

5653 033314 001402 BEQ pp30 

5654 033316 000137 033612 JMP DDERO :BAD FPS 

5655 sACO POS FSRC NEG JAC/</FRSRC/ 

5656 033322 p30: 

033322 012737 033330 001110 MOV #1$, SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 

5657 033330 012704 005200 1$: MOV #5200, :SET FIO,FIV,AND FD 

5658 033334 170104 LDFPS 

5659 033336 012737 033356 001236 MOV #DD31, $TMP2 

5660 033344 012700 034450 MOV #DDP4_RO 7SET ACO OPERAND 

5661 033350 172410 LDD (RO) ,ACO 

5662 033352 012700 034460 MOV #DbP5 RO sF SPC 

$663 033356 172010 DD31:  ADDD  (RO),ACO [TEST INSTRUCTION 

5664 033360 170205 STFPS RS “GET FPS 

5665 033362 012700 034400 MOV #DDDATO,RO ‘GET THE RESULT 

5666 033366 174010 STD ACO, (RO) 

5667 033370 012701 034510 MOV #DDPB. R1 z1S IT CORRECT 

5668 033374 012702 000004 MOV 

5669 033400 022021 DD32: CMP tahoe. (R1)+ 

5670 033402 001415 BEO pp35 :ADD-SUB’ 

5671 033404 012700 034400 MOV #DDDATO,RO “FLOWAS FAILURE 

5672 033410 012701 034500 MOV #DDP7,R1 *CON 216 N440 NOT 141 

5673 033414 012702 000004 MOV #4 R2 : GET GENERATED 

5674 033420 022021 DD33: CMP (RO)+, (R1)+ :FOR THE ALLIGNMENT 

5675 033422 001402 BEQ DD 34 FLOWS? 

5676 033424 000137 034210 JMP DDERO ‘DATA ERROR, D 

5677 033430 077205 DD34: SOB R2,DD33 

5678 033432 600137 034246 MP DDER10 


5679 033436 077220 pp35: S08 R2,DD52 
5680 933440 052704 000010 BIS #i0,R4 


127 





L_10 
ee FPI1F FLTG PNT PRT A MACRO M1113 28=MAR=81 12:56 PAGE 523 SEQUENCE 128 
ST # 34 = ADDD WITH NEGATVE OPRANDS TEST 


5681 033444 0204605 CMP R4LRS sFPS CORRECT? 
5682 033446 001402 BEQ pp %6 
5683 033450 000137 033612 JMP DDERO sBAD FPS 
S ;ACO NEG FSRC 50S /FSRC/</AC/ 
5685 033454 5p 36: 

03 012737 033462 001710 MOV #1$,$LPERR 3SET uP 'e LOOP ON ag A ADDRESS. 
5686 033462 012704 003200 1$: MOV #32 260,R4 | SET FIO, FIV, FD 

033466 170104 LDFPS 
5688 033470 012737 033510 001236 MOV #OD3?. $TMP2 
5689 033476 012700 034460 MOV #DDP5_-RO :SET ACO OPERAND 
5690 033502 172410 LDD (RO) ,ACO 
5691 033506 012700 034450 MOV #DDP4 RO 
5692 033510 172010 DD37: ADDD (RO) ,ACO rest  - shinee 
5693 033512 170205 STFPS R5 GET 
5694 033514 012700 034400 MOV #DDDATO,RO GET Ted RESULT 
5695 033520 174010 STD ACO, (RO) 
5696 033522 072701 034510 MOV #DDPB,R1 z1S IT CORRECT 
5697 033526 012702 000004 MOV #4 ,R2 
5698 033532 022021 DD38: CMP (RO) +, (R1)¢ 
5699 633534 001415 BEQ DD41 
5700 033536 012700 034400 MOV #DDDATO,RO ZADD SUB 
5701 033542 012701 034500 MOV #DDP7 RI “FLOWS FAILURES 
5702 033546 012702 600004 MOV #4 ,R2 “GET 216,042,141 
$703 033552 022021 DD39: CMP (RO) +, (R1)¢ ZFOR THE ALLIGNMENT 
5704 033554 001402 -  BEO DD40 FLOWS? 
5705 033556 000137 034304 IMP DDER11 “DATA ERROR. D 
5706 033562 077205 DD40: SOB R2,DD39 
5707 033564 900137 034342 MP DDERI2 :BAD CONSTANT.D 
5708 033570 077220 DD41: SOB R2,DD38 
5709 033572 052704 000010 BIS #10,R4 
5710 033575 020405 CMP R4,RS sFPS CORRECT? 
5711 033600 001402 BEQ pp42 
5712 033602 000137 033612 MP DDERO ;BAD FPS 
571% 033600 000137 034530 DD42:  JMP DDDONE 
5714 033612 010437 001242 DDERO: MOV R4,$TMPG :FPS ERROR 
5715 033616 010537 001240 MOV R5.$TMP3 
5716 033622 104164 1$ ERROR +1 
5717 033624 000157 034530 JMP DDDONE 
5718 033630 DDER1: 

33630 012737 034420 001240 MOV #DDP1,$TMP3 
033636 012737 034420 001242 MOV #DDP1.STMP4 
33644 012737 034400 001244 MOV #DDDATO, $TMPS 

033652 012737 034520 001246 MOV #DDP9, $TMP6 

03 104165 1$: ERROR +165 

033662 000137 034530 J DDDONE 
5719 033666 DDER2: . 

03 012737 034420 001240 MOV #DDP1,$TMP3 

033674 012737 034420 001242 MOV #DDP1.$TMPS 

033702 012737 034400 001244 MOV #DDDATO, STMPS 

033710 012737 034520 001246 MOV #DDP9, $TMP6 

033716 104176 1$: ERROR +176 

033720 000137 034530 JMP DDDONE 
5720 033724 DDER3: 

033724 012737 034420 001240 MOV #DDP1,$TMP3 — 

033732 012737 034430 001242 MOV #DDP2.$TMP4 

033740 012737 034400 001244 MOV #DDDATO, $IMP5 

033746 012737 034410 001246 MOV #DDPO,$TMP6 
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TEST # 34 = ADDD WITH NEGATVE OPRANDS TEST 

033754 104214 1$: ERROR +214 
033756 000137 034530 JMP DDDONE 

5721 033762 DDERS: 
033762 012737 034430 001240 MOV #DDP2,STMPS 
033770 012737 034420 001242 MOV #DDP1,$ PS 
033776 012737 034400 001244 MOV #DDDATO, STMPS 
034004 012737 034410 001246 MOV #DDPO,$TMP6 
034012 194200 1$: ERROR +200 
034014 000137 034530 ; JMP DDDONE 

5722 034020 DDERS: 
034020 012737 034470 001240 MOV #DDP6, STMPS 
034026 012737 034440 001242 MOV #DDPS,$TMP4 
034034 012737 034400 001244 MOV #DDDATO, $TMP5S 
034042 012737 034500 001246 MOV #DDP7 ,STMP6 
034050 104165 1$: ERROR +165 
034052 000137 034530 JMP DDDONE 

5723 034056 DDER6: 
034056 012737 034470 001240 MOV #DDP6, $TMPS 
024064 012737 034440 001242 MOV #DDP3S,.STMPS 
34072 012737 034400 001244 MOV #DDDATO, $TMP5S 
034100 012737 034500 001246 MOV #DDP7 ,STMP6 
034106 104201 1$: ERROR +201 
034110 000137 034530 JMP DDDONE 

5724 034114 DDER7?: 
034114 012737 034440 001240 MUV #DDP3,STMPS 
034122 012737 034470 001242 MOV #DDP6,STMPS 
034130 012737 034400 001244 MOV #DDDATO, STMPS 
034136 012737 034500 001246 MOV 4#DDE7 ,STMPE 
034144 104165 1$: ERROR +165 
034146 000137 034530 JMP DDDONE 

5725 074152 DDERB: 
034152 012737 034440 001240 MOV #DDP3,$TMP3 
034160 012737 034470 001242 MOV #DDP6,STMPS 
034765 012737 034400 001244 MOV #DDDATO, $TMP5S 
034174 012737 034500 001246 MOV #DDP7, STMP6 
034202 104202 1$: ERROR +202 
034204 000137 034530 JMP DDDONE 

>. .o 034210 DDER9: 
034210 012737 034460 001240 MOV #DDPS ,STMP3 
034216 012737 034450 O0i242 MOV #DDP4 ,STMPS 
034224 012737 034400 001244 MOV #DDDATO, $TMPS 
034232 012737 034510 001246 #DDP8,STMP6 
034940 104165 1$: ERROR +165 
034.42 000137 034530 JMP DDDONE 

5727 034246 DDER10: 
034246 012737 034460 001240 MOV #DDP5 ,STMPS 
034254 012737 034450 001242 MOV #DDPS ,STMP4: 
034 012737 034400 001244 MOV #DDDATO, STMPS 
034270 012737 034510 001246 MOV #DDP8,STMP6 
034276 104203 1$: ERROR +203 
034300 000137 034530 JMP DDDONE 

5728 034304 DDER11: 
034304 012737 034450 001240 MOV #DDPS ,STMPS 
034312 012737 034460 001242 MOV #DDPS ,STMP4 
034320 012737 034400 001244 MOV #DDDATO, $TMP5 
034326 012737 034510 001246 MOV #DDPB,STMP6 
034334 104165 1$: ERROR +165 





= 


| 
| CKFPACO FP11F FLTG PNT PRT A 
TEST # 34 = ADDD WITH NEGATVE OPRANDS T 


5741 £32830 
034530 


000137 


034530 
034450 
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DDERI2: 


1$: 
DDDATO: 


DDDONE 


#DDPS ,STMP3 
#DDP5 ,STMP4 
#DDDATO, STMPS 
ig »STMP6 


DDDONE 


0° 4°0 “0 


168806, 0.0.0 
700 5050,0 


SEQUENCE 130 


3~DDP2 
3~DDP1 
ZEXP=4 ;FRAT=...110... 
sEXP=3 FRAC=...100... 
;~DDP3 

;~DDP4 

[DDP3+DDP6 

[DDP5+DDP4 

[DDP1+DDP1 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSCD 

;THE DESIRE TO CHANGE THE SOF TWARE 
TVIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


ao 


| 

| CKFPACO FPIIF FLTG PNT 
| TEST # 35 = SUBD TEST 
| 


5749 


wv 

NS 

Ww 

Ww 
oO oO cos 

ERE 

4 w 

SAF 


ride | 034662 
5789 034666 
034666 

5781 034674 
782 034700 
5783 Egy 


5784 0347 
3585 034714 


4 w PAA ‘ 
ag 
oo 
¥E 
+2 
RN 


PRT A 


034542 
003200 


034570 
635254 


035254 
035232 
035242 
000004 


035232 
035264 
000004 


035042 
035100 
000004 


000137 035024 


uw 
N 


034674 
003200 


034722 
035274 


035274 


SMOOWNMNNN ON 
ASSSSNRR 


035232 
035242 
000004 


oOo00-0--0-00-00 
Nt NY NN OP NOP Ow 


8 
—NNnon 
som 
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. SBITL 


TEST # 35 = SUBD TEST 


SEQUENCE 


hd AREER AERA EEEEREREE TEER EERAERER ERROR REKAARHe eRe R REA AHS 


S*TEST 35 


SUBD TEST 


;* 
:* THIS IS A TEST OF THE SUBD INSTRUCTION. 


:* BOTH A POSITIVE AND A NEGATIVE NUMBER 


is 1S 
15135: 
001110 


001236 


EE2: 


EES: 


EE4: 


EES: 
EE6: 


EE?: 
001110 
1$: 


001236 


EE8: 


EE9: 


SUBTRACTED FROM IT SELF 
OPE 

OSE POSITIVE OPERANDS 
MOV #1$,$LPERR 
MOV #3200,R4 
LDFPS  R4 
MOV HEE2, $IMP2 
MOV #EEP RO 
LDD (RO) ,ACO 
MOV #EEP1 RO 
SUBD (RO) ,ACO 
STFPS R5 
MOV #EEDATO,RO 
STD ACO, (RO) 
MOV #EEPO,R1 
MOV #4 ,R2 
CMP (RO)+,(R1)+ 
BEQ EE 
MOV #EEDATO,RO 
MOV #EEP2,R1 
MOV #4 ,R2 
CMP (RO) +, (R1)+ 
BEQ E5 
JMP EEER1 
SnB R2,EE4 
JMP EEER2 
SOB R2,FE3 
BIS #4 RS 
CMP R4_RS 
BEQ EE? 
JMP EEERO 
“USE NEGATIVE OPERANDS 
MOV #1$,$LPERR 
MOV #3200,R4 
LDFPS 4 
MOV #EES STMP2 
MOv #EEP PSR 
LDD (RO) ry 
MOV #EEPS,RO 
SUBD (RO) ,ACO 
STFPS RS 
MOV #EEDATO,RO 
STD ACO, (RO) 
MOV #EEPO,R1 
MOV #4.R2 
CMP (RO) +, (R1)+ 
BEQ EE12 


sSET UP 


sSET UP 


nan "pate aes ata aN UR ICS A ee) oe uN 


THE LOOP ON ERROR ADDRESS. 
;SET FIO, FIV, AND FD 


SET ACO OPERAND 


sF SPC 

:TEST INSTRUCTION 
;GET FPS 

;GET THE RESULT 
31S IT CORRECT? 


;DID A BAD 
CONSTANT (NOT 57) 
:GET GENERATED 

ZFOR THE ALL] GNMENT 


FLOWS? 
“DATA ERROR .D 


;BAD CONS ‘ANT .D 


FPS CORRECT? 
;BAD FPS 


THE LOOP ON ERROR — 


7SET FIO, FIV, AND F 


SET ACO OPERAND 


rest INSTRUCTION 
IGET FPS 
TGET THE RESULT 


31S IT CORRECT? 





c— 


ge FPIIF ars PNT PRT A 
TEST # 35 = SUBD TEST 


5795 034750 


5799 766 
5800 034770 
5801 034774 
5802 034776 
5803 035002 

04 004 


0 

5814 035100 
0 
0 

5815 peeite 


0 
5816 035174 
03 


22 304 
5825 peseie 
035314 


012700 


104413 


035232 


035136 
035174 
000004 


035024 


001240 
035314 
035254 


035242 
035314 
035254 


035242 
035314 
035274 


035242 
035314 
035274 


035242 


035314 
000000 
0000 
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00124 
001242 
001244 
001246 


001240 


001246 


00140 
00. 


<42 
001244 
001246 


001240 
001242 
001244 
001246 


#EEDATO,RO 
#EEPS RI 


#4 ,R2 
(RO) +, (R1)+ 
EE 


#EEP1,STMP3 
#EEP1, STMP4 
#EEDATO, STMP5 
#EEPO, STMP6 
+206 


EEDONE 


MEEP1 .STMP3 
#EEP1,STMP4 
#EEDATO,$TMP5S 
#EEPO,$TMP6 
+207 


EEDONE 


#ESP3,$TMP3 
#F P3,$TMPS 

# EDATO,$TMPS 
#cEPO,STMP6 
+206 


EEDONE 


MEEPS, STMP3 
MEEPS, STMP4 
MEEDATO, $TMP5 
MEEPO, STMP6 


SEQUENCE 


;DID A BAD 
[CONSTANT (NOT 57) 
[GET GENERATED 

7FOR THE ALLIGNMENT 
FLOWS? 

[DATA ERROR.D 


;BAD CONSTANT .D 


FPS CORRECT? 
;BAD FPS. 
;BAD FPS 


3GO INITIALIZE THE FPS AND STACK; AND 
TSEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANG: THE SOP T WARE 
TVIRTUAL CONSOLE SWITCH REGISTER (HAS 


132 





SO 


—v 


2 


D111 
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# 35 = SUBD TEST 


7 THE USER TYPED CONTROL G?). 





4a 


| 5833 


035316 
035320 


035412 


6 
035414 


000004 


012737 


Sos Ssse 
SSSSSYRSY 


-KFPACO FPTIF FLTG PNT PRT A 
EST # 36 = NORMALIZE ALGORITHM TES 


035326 
003200 
035354 
035652 
035662 


035622 


035672 
000004 


035422 
203200 


035450 
035632 


035642 


035622 


035672 
0C2004 
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001110 


001236 


001110 


001236 


SEQUENCE 


.SBTTL TEST # 36 = NOR ALIZE ALGORITHM TEST 


> SR REREREEAREE RARER EREREHERERHAHEHAHREREREHE RHEE RA ETRE HE RHEE ERAEE 


; TEST 36 NORMALIZE ALGORITHM TEST 


:* THIS IS A TEST OF THE NORMALIZE 

>* FLOW ALGORITHM. TWO PATTERNS ARE USED 

;* FIRST THE MINIMUM SITUATION REQUIRING ONE 
:* LEFT SHIFT AND THEN THE MAXIMUM SITUATION 
;* REQUIRING 56 SHIFTS. 


REE E RR EARREEREEEE EAE REE REAR AREEEEAEERAEEAREHEEEREEEERH ERE 


a ee en ee 


S136: SCOPE 
:USE DATA PATTERNS THAT REQUIRE ONLY ONE LEFT SHIFT TO NORMALIZE 
MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1$: MOV #3200,R4 sSET FIO, FIV, AND FD 
LOFPS RG 
MOV #FF2,$TMP2 
MOV #FFP2,RO :SET ACO OPERAND 
LDD (RO), ACO 
MOV #FFPS,RO F SPC 
FF2: ADDD (RO), ACO sTEST. INSTRUCT ION 
STFPS RS “GET F 
MOV #F FDATO,RO GET THe RESULT 
STD ACO, (RO) 
MOV #FFPG, R1 :IS IT CORRECT 
MOV #4 ,R2 
FFT: CMP (RO) +, (R1)+ 
BEQ FFG 
BR FFER2 :BAD DATA 
FFG: SOB R2,FF3 
CMP R4_RS5 :FPS CORRECT? 
EO FS 


B FFERO ;BAD FPS 
USE DATA PATTERNS WHICH REQUIRE 56 LEFT SHIFTS TO NORMALIZE 


s THE RESULT 
FFS: 


MOV #1$,$LPERR :SET UP THE.LOOP ON ERROR eee 
1$: MOV #3200,R4 sSET FIU, FIV, AND FD 
LDFPS RG 
MOV AFFE,STMP2 
MOV #FFPO,RO 7SET ACO OPERAND 
LDD (RO) ,ACO 
MOV #FFP1,RO FSRC 
FF6: ADDD (RO) ,ACO tTEST INSTRUCTION 
STFPS R5 GET FPS 
MOV #FFDATO,RO GET THE RESULT 
STD ACO, (RO) 
MOV #FFPG,R1 :1S IT CORRECT 
MOV #4,R 
FF?: CMP (RO) +, (R1)+ 
BEQ FFIO 
BR FFERI ZBATA 
FF10: SOB R2,FF7 
CMP 4,R sFPS CORRECT? 
BEQ FFA 
BR FFERO :BAD FPS 


134 


TEST @ 


5877 
5878 


5885 
5886 


035510 


035524 


84 Oeeese 


035614 
035616 


8 
035622 


035702 


CKFPACO FPIIF FL TG PNT PRT A 
36 = NORMALIZE ALGOR, THM 


035672 
035702 


035672 
035702 


TES 
FFI1: 


FFERO: 


1$: 


FFER2: 


0012466 
1$: 


000000 
000000 
000000 
000000 
000000 
000000 


FFPO: 
FFPT: 
FFP2: 
FFP3: 
FFPG: 
FF DONE : 
TSTS72 


FFDATO: . 


BR 


F 11 
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F F DONE 


RS,STMP3 
R4,$TMPG 
+164 

FF DONE 


#FFPTLSTMPS 
#F°PO,STMPS 
#FFDATO,STMPS 
#FFPG,STMP6 


aFFEP3,$TMP3 
#FFP2,$TMPG 
#FFDATO,$TMP5 
#FFP4,STMPG 


SEQUENCE 135 


TFFPG=FFPO+FFPI=FFP3+F FPG 


| CKFPACO FRPTIF FLTG PNT PRT A 
END OF PASS ROUTINE 


‘$898 


035702 


035742 
035746 


035766 
035766 


035772 
035774 
036000 


036044 
036044 


036950 
036052 
036056 
036062 
036066 
036070 
036072 
036076 


036100 
936100 


DOOOOCOCOCCCOCO 
SSESSESSSESS 
FERVBVSRTSR 


013746 
104405 
104401 
000421 


015746 


001102 


100000 


035750 


001324 
036002 
001112 
00131 3 
001112 
000042 
036100 


000042 


000020 
010000 


036162 
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001324 


143004 


.SBITL END OF PASS ROUTINE 


° REAR AAAEEARAEARARAEARARERATAAEHARREREAARRHARAA RRA ARE REAR Ee 


+*INCREMENT THE PASS NUMBER ($PASS) 


; * INDICATE END=OF -PROGRAM AFTER 


1 PASSES THRU THE PROGRAM 


t*TYPE ‘END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT yyyyy’’ 
T*WHERE XXXXX AND YYYYY ARE DECIMAL NUMBERS 


:*IF SW12=1 INHIBIT TRACE TRAP 
z*IF THERES A sy GO TO IT. 


self _THERE ISN*T JUMP TO LOOP 
$EOP: 
SCOPE 
CLR STSTNM 
CLR $STIMES 
INC $PASS 
BIC #100000, $PASS 
DEC. (PC) + 
$EOPCT: .WwORD 1 
BGT $DOAGN 
MOV (PC) +,a(PC)+ 
$SENDCT: .WORD 1 
SEOPCT 
TYPE 20% 
BR 64$ 
Ts eASCIZ = <12><15>/END pass’ a/ 
MOV $PASS ,~ (SP) 
TYPDS 
TYPE .67$ 
BR 66% 
3:67$: .ASCIZ / TOTAL ERRORS 
66$: 


MOV $SERTTL,-(SP) 


TYPDS 

TYPE . $CRLF 

CLR SERTTIL 
$GET42: MOV a#42,R0 

BEOQ $DOAGN 

CLR -(SP) 

MOV M$CLR.T,-(SP) 

BR SRTRN 


$CLR.T: 
MOV af42,R0 
BEQ $SDOAGN 
RESET 

SEND4D: JSR PC, (RO) 
NOP 
NOP 
NOP 

$DOAGN: 
TRAP 
BIC #20, (SP) 
BIT #B17T12,aSWR 
BNE 1$ 
COM $TRIT 


;ZERO THE TEST NUMBER 

3 ZERO THE NUMBER OF ITERATIONS 
; INCREMENT THE PASS NUMBER 

: DON"! ALLOW A NEG. NUMBER 

get . 


i3YES 
7sRESTORE COUNTER 


TYPE ASCIZ STRING 
[GET OVER THE ASCIZ 


SAVE $SPASS FOR TYPEOUT 
TYPE PASS NUMBER 

3GO TYPE--DECIMAL ASCII WITH SIGN 
:i TYPE ASCIZ STRING 

GET OVER THE Ha 
SINCE LAST REPORT / 


SAVE SERTTL FOR TYPEOUT 
* STOTAL NUMBER OF ERRORS 
3:GO TYPE--DECIMAL ASCII WITH SIGN 
72 TYPE CARRIAGE RETURN, LINE FEED 
see ERROR TOTAL 

:GET MONITOR ADDRESS 

BRANCH IF NO MONITOR 

3 INSURE THE mt an .* nem 
3 SETUP FOR AN RTI O 

:GO_ DO AN RTI OR ait io. LOAD THE PSwW 
t:WITH A CLEARED ‘'T'' BIT 


32 INSURE RO — THE MONITORS 


: ¢PUSH OLD PSw AND PC ON STACK 
CLEAR THE ‘'T’’ BIT 

oe hn TRACE TRAP? 
z1S IT TIME FOR TRACE TRAP 


SEQUENCE 


136 


CKeFPACO FPTIF FLTG PNT PRT A 
FND OF PASS ROUTINE 


100462 
036144 052716 
036150 012746 
000002 


036154 
936156 
036156 000137 
036160 004300 
036162 


C00020 
036156 


377 


000 


SENULL: 
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BM] 1$ 
BIS #20, (SP) 
at #$LOOP,=(SP) 


JMP a(PC)+ 
L OOF 


. 0 
-PYTE ©1,°1,0 


SEQUENCE 


R IF NO 
‘Ber TRACE TRAP 
JUMP TO START OF TEST 
2 sRETURN@==THIS_ 1S CHANGED TO 
sAN "RIT JF RTT TS A LEGAL 
«INSTRUCTION 


;ZRETURN 


:3°'T'’ BIT STATE INDICATOR 
> ENULL CHARACTER STRING 


137 
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| SCOPE HANDLER ROUTINE 


5900 : -SBTTL SCOPE HANDLER ROUTINE 


SEERA TERRA ERARE REE ERARARRAAREEEERERE ETHER EEE ERE R ERE Ee 
> *THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
 *AND LOAD THE TEST NUMBER(S$TSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
;*AND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<15:08> 
*THE SWITCH wie og be BY THIS ROUTINE ARE: 


+ *Swi4= 1 ON T 
Swi l= 1 INHIBIT ITERATIONS 
+ *SwO9=1 LOUP ON ERROR 
—— LOOP ON TEST IN SWR<7:0> 
7 * CALL 
3* SCOPE 32 SCOPE=I0T 
036170 $SCOPE: 
036170 104407 CKSWR sTEST FOR CHANGE es SOF T=SWR 
036172 032777 040000 142740 1$: BIT #B1T14,aSwR SLOOP ON PRESENT TES 
036200 001131 BNE SOVER sYES IF Sw14=1 
;ARARASTART OF CODE FOR THE XOR TESTERSHHAA 
636202 000416 $XTSTR: BR 6$ cil RUNNING ON THE My 4” TESTER CHANGE 
: THIS INSTRUCTION T *NOP’’ (NOP=240) 
036204 013746 000004 MOV @AERRVEC ,-( SP) 17 SAVE | by tl OF “Me ERROR VECTOR 
036210 012737 036230 000004 MOV #5$, aMERRVEC rt ly OR TIMEOU 
036216 095737 177060 TT a4177060 TIME CUT ON X aOR? 
036222 012037 000004 Mov (SP) +, @#ERRVEC + RESTORE THE ERROR YECTOR 
036226 000500 BR $SVLAD +S TO THE NEXT TES 
036230 022626 5$: CMP (SP)+, (SP)+ ; CLEAR THE STACK SP TER A TIME OuT 
036232 012637 000004 MOV (SP) +, a#ERRVEC ; 3RESTORE THE ERROR VECTOR 
036236 000440 BR 7$ LOOP ON THe PRESENT TEST 
036240 6$:;4#A#A44END OF CODE FOR THE XOR TESTER#AAAA 
036240 032777 000600 142672 BIT . #BITO8,aSwWR fe a ON SPEC. TEST? 
036246 001404 BEQ b 3 F NO 
036250 127737 142664 091102 CMPB aSwR,$TSTNM ON THE RIGHT TEST? SWR<7:0> 
C36256 001502 ‘ BEQ SOVER BR IF YES 
036260 013737 1777(>5 036502 2$: MOV 177766, CPSAVE sMOVE CPU ERR REG VALUE TO LOC FOR TST ;DPMOO1 
036266 032737 OOL.-° 036502 BIT #B1T00,CPSAVE ;SEE IF THE POWER MONITOR BIT IS ON > DPMOO1 
036274 001406 BEQ 2000$ S BRANCH TO CONTINUE ROUTINE IF CLEAR ;DPMO01 
036276 0427357 000001 177766 BIC #B1T00,177766 ;CLEAR THE BIT FOUND TO BE SET :DPMOO1 
036304 104177 ERROR +177 ;CALL SPECIAL POWER FAIL BIT ERROR CALL ;DPMOO1 
036306 105037 001103 CLRB SERFLG CLEAR THE ERROR FLAG FOR NEXT TEST ;DPMCO1 
036312 105737 001103 2000$: TSTB SERFLG 2 sas AN ERROR OCCURRED? 
C36316 001421 BEQ 3$ ;BR IF NO 
036320 123737 001115 001103 CMPB SERMAX ,SERFLG 7 MAX. ERRORS FOR THIS TEST OCCURRED? 
036326 101015 BH] ;BR IF NO 
330 032777 001000 142602 BIT #B1TO9,aSwR >:LOOP ON ERROR? 
036336 (91404 BEQ 4$ e: IF NO 
036340 013737 001110 001106 7$: MOV $LPERR,$LPADR ;;SET LOOP ADDRESS TO LAST SCOPE 
036346 000446 BR $OVER 
036350 105037 001103 4$: CLRB SERFLG 7zZERO THE ERROR FLAG 
036354 005037 001302 CLR STIMES e2Cb LEAR THE NUMBER OF ITERATIONS TO MAKE 
036360 000415 BR 1$ sESCAPE TO THE NEXT TEST 
2 032777 004000 142550 3$: BIT #B1T11,aSwWR : INHIBIT ITERATIONS? 
036370 001011 BNE i$ $4 13 IF YES 
036372 005737 001324 TST $PASS cIF FIRST PASS OF PROGRAM 
036376 001406 RFQ 1$ INHIBIT ITERATIONS 
036400 005237 001104 inc SICNT INCREMENT ITERATION COUNT 


036404 023737 001302 001104 CMP STIMES,SICNT +o CHECK THE NUMBER OF ITERATIONS MADE 





| CKFFACO FRTIF FLTG PNT 
SCOPE HANDLER ROUTINE 


| 
| 
| 
; 
' 
| 
H 
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BGE SOVER 
001104 18: MOV #1, $1CNT 
001302 MOV SMXCNT,STIMES 
$SVLAD: INCB STSTNM 
001322 MOVB $TSTNM,STESTN 
MOV (SP) , $LPADR 
: MOV (SP) ,SLPERR 
CLR $ESCAPE 
001715 MOVB #1, SERMAX 
142450 $OVER: MOV $TSTNM,@DISPLAY ; 
MOV $LPADR, (SP? 
RTI 
SMXCNT: 1. 
CPSAVi: .WORD 0 


SEQUENCE 


;BR IF MORE ITERATION REQUIRED 
: 7REINITIALIZE THE ITERATION COUNTER 
33SET NUMBER OF nd ae TO DO 
3=:COUNT TEST NUMBERS 
32SET TEST NUMBER IN APT MAILBOX 
3;SAVE SCOPE LOOP ADDRESS 
3;SAVE ERROR LOOP ADDRESS 
hey THE ESCAPE FROM ERROR ADDRESS 
ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
;DISPLAY TEST NUMBER 
FUDGE RETURN ADDRESS 
:ZEIXES PS 
ER OF ITERATIONS 


NUMB: 
‘fOCATION TO SAVE CPU ERR REG CONTENTS ;DPMOO1 


139 


(a 


CKFPACO FPTIF FLTG PNT Tai A 


ERROR HANDLER ROUTINE 


036634 013737 
(36642 032777 
001004 


122737 
001007 
036672 113737 
004737 


| 

| 

| 

| 
936504 000000 
036506 105037 
036512 104407 
036514 105237 
036520 001775 





036504 
001103 
001102 
002000 
001306 
001112 
001116 
000002 


742330 
000177 


177766 
000001 
020001 
001116 
036504 
020000 


041342 
001313 


000001 


001114 
040174 


036504 
142216 


001000 


001116 
142270 


001336 
036704 


142202 


K 11 
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tebe ERROR HANDLER ROUTINE 


WOUTTTTTITTIT TILL LTT Tree Eo 
SSTHIS ROUTINE WILL INCREMENT 7HE ERROR FLAG AND THE ERROR COUNT, 
:*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
+ *AND GO TO ERTYPE ON ERROR 
* THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


*Swi5= : HALT ON ERROR 
:*Sw1 3=1 INHIBIT ERROR TYPEOUTS 
+ *SW10=1 BELL ON ERROR 
rm LOOP ON ERROR 
3*CALL 
5* ERROR N > ERROR=EMT AND N=ERROR IT: ™ NUMBER 
IBSAVE: .WORD 0 ;LOC'N TO HOLD $ITEMB DURING DUA! ERR ;DPMOO01 
$ERROR: CLRB IBSAVE sCLEAR THE ITEM BYTE SAVE LOCAT!ON ;DPMOO1 
CKSWR +: TEST FOR CHANGE IN SOF T=SWR 
7$: INC SERFLG 23 SET THE ERROR FLAG 
BEG 7$ ;DON'T LET THE FLAG GO TO ZERO 
MOV $TSTNM,@DISPLAY = DISPLAY TEST NUMBER AND ERROR FLAG 
BIT #B1T10,aSWR 2 sBELL ON ERROR? 
BEQ 1$ SKIP 
TYPE -SBELL : FRING BELL 
1$: INC $ER RTTL ; COUNT THE NUMBER OF ERRORS 
ry Sg t3 oe” SIGET ADDRESS OF ERROR INSTRUCTION 
MOVB SSERREC $1 TEMB STRIP AND SAVE THE ERROR ITEM CODE 
CMPB #177, SITEMB ‘ere IF THIS IS THE POWFR FAIL CALL :DPMOO1 
BEQ 1000$ BRANCH AROUND PMB TEST IF IT IS ;DPMOO1 
MOV 177766, CPSAVE sMOVE CPU ERR REG TO CPSAVE FOR TEST ;DPMOO01 
BIT #B1T00,CPSAVE :SEE IF POWER MONITOR BIT IS SET :DPMOO1 
BEQ 1000$ BRANCH IF OK ;DPMO01 
BIC #B1T00,177766 :CLEAR THE BIT FOUND SET :DPMOO1 
MOV SERRPC, IBSAVE + SAVE $LORPC ;DPMOO01 
ERROR +177 sCALL SPECIAL POWER MONITOR BIT ERROR :DPMOO1 
10008 MOV IBSAVE , SERRPC * RESTORE SERRPC 
BIT #B1T13,aSWR szSKIP TYPEOUT IF SET 
BNE 20$ 7: SKIP TYPEOUTS 
JSR PC, ERTYPE 3;GO TO USER ERROR ROUTINE 
208 TYPE -SCRLF 
CMPB MAPTENV, SENV : ¢ RUNNING IN APT MODE 
BNE 2$ :NO,SKIP APT ERROR REPORT 
MOVB $ITEMB,21$ DISET ITEM NUMBER AS ERROR NUMBER 
JSR PC, SATY4 : REPORT FATAL ERROR TO APT 
218: -BYTE 0 
BYTE 0 
223: BR 22$ : APT ERROR LOOP 
es: TST IBSAVE sSEE IF POWER FAIL ERROR CALL :DPMOO1 
BNE 3$ * BRANCH IF NOT - HALT NOT ALLOWED :DPMOO! 
TST aSwR ; HALT ON ERROR 
BPL 3$ sSKIP IF CONTINUE 
HALT 3 HALT ON ERROR! 
CKSWR ; TEST FOR CHANGE IN SOF T= SwR 
3$: BIT #B1T09,aSWR +: LOOP ON ERROR SWITCH SET? 
BEQ 4$ ;;BR IF NO 


140 


Tees 


| 
| 
| 
| 
| 
| 


C 
E 


KFPACO FP11F FLTG PNT PRT A 
RROR HANDLER ROUTINE 


013716 
022737 
001001 


032777 


036504 
001110 
001304 
036504 


001304 
036110 


001000 
001162 
177776 
000377 


0C0002 
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000042 


142126 


001162 
142126 


4$: 


5$: 


6$: 


ERM10: 


a 
$LPERR, (SP) 
$ESCAPE 

5$ 

ate 
SESCAPE , (SP) 
ASENDAD 0442 
6$ 


#B1T09,aSWR 
ERM10 
(SP) , $RFGO 
#-2,$REGO 
A aaa 


ERM 
#2,(SP) 


3SEE IF THIS IS THE PWR MONITOR ERROR 
;BRANCH BACK IF SO = NO FUDGING 
7:FUDGE RETURN FOR LOOPING 
7:CHECK FOR AN ESCAPE ADDRESS 

; IF NONE 


SEE IF THIS IS THE PWR trys ERROR 
BRANCH BACK IF SO = NO FUDGING 
32FUDGE RETURN ADDRESS FOR. ESCAPE 


3zACT=11 AUTO-ACCEPT? 
7 BRANCH IF NO 


SEE IF ERROR #377 


SEQUENCE 141 


;DPMOOT 
;DPMO01 


;DPMOO1 
;DPMO01 


Bo eee yerg ted Soe SS ea ENS eS 
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SAVE AND RESTORE RO=R5 ROUTINES ; 
5904 ; - SBTTL SAVE AND RESTORE RO=-R5 ROUTINES 
PARAS AASRRASAL AS 2 2 Be ERE ERR RE REREEEERE TEAR 
T*SAVE RO=RS5 
:*CALL: 
i* SAVREG 
: SUPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE: 
eTOP===(+16) 
p* +2-==(+18) 
p* +4---R5 
7* +6---RS 
7* +8---R3 
3*+10---R2 
3*+12---R1 
3*4+14---R0 


i?) 
Ww 
e 
So 
Ww 
Nm 
oO 
—_ 
oO 
W 
7 
oO 
3 
< 
P °) 
nw 
. 
pA 
wn 
v 
~ 
eee 
NnMnNwWM 
= 
P*] 
WG 
2essss 

a) 
4 
> 
oO 
x 


037060 016646 000022 MOV 22(SP) ,=(SP) 72SAVE PS OF MAIN FLOW 
037064 016646 000022 MOV 22(SP) ,=(SP) 7zSAVE PC OF MAIN FLOW 
037070 016646 000022 MOV 2¢ (SP) ,=(SP) 7zSAVE PS OF CALL 
037074 bes 000022 MOV 22(SP) ,-(SP) 33SAVE PC OF CALL 


RT] 
zs *RESTORE RO-R5 
7*CALL: 


3* RESREG 
037102 $RESREG: 
037102 012666 000022 MOV (SP)+,22(SP) 7zRESTORE PC OF CALL 
037106 012666 ae MOV (SP)+,22(SP) 2 sRESTORE PS OF CALL 


; PC 
037116 012666 000022 MOV (SP)+,22(SP) 7zRESTORE PS OF MAIN FLOW 
037122 012605 MOV (SP)+,R5 3:POP STACK INTO R5 
037124 012604 MOV (SP) +,R4 3zPOP STACK INTO R4 
037126 012603 MOV (SP)+,R3 7:POP STACK INTO R3 
037130 012602 MOV (SP)+,R2 32POP STACK INTO Re 
037132 012601 MOV (SP)+,R1 3zPOP STACK INTO R1 


037044 SSAVREG: 

037044 010046 MOV RO,-(SP) 73PUSH RO STACK 

037134 012600 MOV (SP) +,RO 3zPOP STACK INTO RO 
00000 


—EE ———— 


[> 
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TYPE ROUTINE 
5906 .SBITL TYPE ROUTINE 
| FFARR ARAAAAARARAERERAERAARERERERRAKHEEREARRRRERERERERRERREE EE 
> *ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
; * THE ROUTINE WILL INSERT A NUMBER OF L CHARACTERS AFTER A LINE FEED. 
> *NOTE1 $NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
‘ *NOTE2: SPILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
NOTE 3: $FILLC CONTAINS THE CHARACTER TO FILL AFTER. 
ce 
s*CALL: 
:*1) USING A TRAP iNSTRUCTION 
pee TYPE ,MESADR ZiMESAOR IS FIRST ADDRESS OF AN ASCIZ STRING 
** 
* TYPE 
te ME SADR 
037140 105737 001157 $TYPE: TSTB $TPFLG i218 THERE A TERMINAL? 
037144 100002 BPL 1$ 
037146 000000 HALT sme HERE IF NO TERMINAL 
037150 000430 BR 3$ ;:LEAVE 
637152 010046 1$: MOV RO,-(SP) [SAVE RO 
037154 017600 000002 MOV a2(SP) ,RO °:GET ADDRESS OF ASCIZ STRING 
037160 122737 000001 001336 CMPB = WAPTENV,SENV = ;RUNNING IN APT 
037166 061911 BNE 62$ [NO,GO CHECK FOR APT CONSOLE 
037170 132737 000100 001337 BITB § #APTSPOOL,SENVM ::SPOOL MESSAGE TO APT 
037176 001405 BEQ 62$ 5 ENO: GO CHECK FOR CONSOLE 
037200 010037 037210 MOV RO,61$ “SETUP MESSAGE ADDRESS FOR APT 
037204 004737 040164 JSR PC. $ATY3 +: 5PU0L MESSAGE TO AP 
037210 000000 61$: “WORD 0 [MESSAGE ADDRESS 
037212 132737 .000040 001337 6's:  BITR  #APTCSUP,SENVM STAT CONSOLE SUPPRESSED 
037220 001003 BNE 60$ i EYES. SKIP TYPE OUT 
037222 112046 2$: MOVB (RO) +, =(SP) SPUSH CHARACTER TO BE TYPED ONTO STACK 
027294 01005 BNE 4$ *:BR IF IT ISN'T THE TERMINATOR 
037226 005726 TST (SP) + ttTF TERMINATOR POP IT OFF THE STACK 
037230 012600 60$: MOV (SP)+,RO * RESTORE RO 
037232 06°716 000002 3$: ADD #2, (SP) + ADJUST RETURN PC 
037236 000002 RT] t3R 
037240 122716 000011 4$: (MPR —s #HT, (SP) BRANCH IF <HT> 
037244 001430 BCO PS 
037246 122716 000200 CMPB es @CRLF, (SP) - BRANCH IF NOT <CRLF> 
037252 001006 BNE 
037254 005726 6. (SP) + 77POP <L2><LF> EQUIV 
037256 104401 TYPE +: TYPE A CR AND LF 
037260 0013173 $CRLF 
037262 105037 037500 CLRB $CHARCNT z:CLEAR CHARACTER COUNT 
037266 000755 BR 2$ >:GET NEXT CHARACTER 
037270 004737 037352 5$: JSR PC ,$TYPEC :3GO TYPe THIS CHARACTER 
037274 123726 001156 6$: (MPR ss SF ILL, (SP) + [IS IT TIME FOR FILLER CHARS. ? 
037300 001350 BNE 2$ IF NO GO GET NEXT CHAR, 
037302 013746 001154 MOV $NULL ,-(SP) [GET # OF FILLER CHARS. NEEDED 
+:AND THE NULL CHAR. 
037306 105366 000001 7$: DECB ~=—-:«+1( SP) : :DOES A NULL NEED TO BE TYPED? 
037312 002770 BLT og BR IF NO-~60 Sop THE NULL OFF OF STACK 
037314 004737 037352 JSR PC ,$TYPEC 3360 TYPE A 
037320 105337 037500 DECB  $CHARCNT :DO NOT COUNT. ks A COUNT 
037324 000770 BR 7$ +: LOOP 
sHORIZONTAL TAB PROCFSSOR 
037326 112716 000040 R$: MOVB  #* ,(SP) Z:REPLACE TAB WITH SPACE 





| CKEPACO FP11F FLTG PNT PRT A MACRO M1113 


| TYPE ROUTINE 
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037332 004737 037352 JSR 
037336 132737 G00007 037500 BITB 
| 037344 001372 © BNE 
037346 005726 TST 
037350 000724 BR 
037352 $STYPEC: 
037352 105777 141546 T3186 
| 037356 100022 BPL 
7360 017746 141562 MOV 
37 042716 177600 BIC 
037370 122716 000023 CMPB 
037374 001012 BNE 
037376 101$: 
037376 105777 141542 TSTB 
037402 100375 BPL 
037406 117716 141536 MOVB 
037410 042716 177600 BIC 
037414 122716 000021 CMPB 
037420 001366 BNE 
637422 102$: 
037422 005726 TST 
037424 10$: 
937424 105777 141520 TSTB 
037430 100375 BPL 
037432 126627 000002 000021 CMPB 
037440 001420 BEG 
037442 116677 000002 141502 MOVB 
037450 122766 000015 000002 CMPB 
037456 001003 BNE 
037460 105037 037500 CLRB 
037464 000406 BR 
037466 122766 000012 00002 1$: CMPB 
037474 001402 BEQ 
037476 105227 INCB 
037500 000000 $CHARCNT : .WORD 


037502 000207 


: 


$TYPEX: RTS 


PC,$TYPEC 
#7, $CHARCNT 
9$ 


(SP) + 

2$ 

astKs 

10$ 
@$TKB,-(SP) 
#177600, (SP) 


ASXOFF , (SP) 
102$ 


tht 


- 101$ 
@$TKB, (SP) 


#177600, (SP) 
#$XON, (SP) 
101$ 


(SP) + 

a$TPS 

10$ 

2(SP) ,4#$XON 
$STYPEX 
2(SP) ,a$TPB 
+ ata 


ALF ,2(SP) 
$TYPEX 
(PC)+ 

0 

PC 


ie TYPE A SPACE 
: sBRANCH IF NOT AT 
3 TAB STOP 
::POP SPACE OFF STACK 
72GET NEXT CHARACTER 


;:CHAR IN KYBD BUFFER? 
7 BR a a 


;;GET 

oS FRIP MP XTRANEOUS BITS 
3; zWAS CHAR XOFF 

37;BR IF NOT 


3zWAIT FOR CHAR 


3:GET CHAR 

SISTRIP IT 

oy IT XON? 
;BR IF NOT 


scFIX STACK 
:;WAIT UNTIL PRINTER IS READY 


31S CHARACTER A RANDOM XON? 
erty IF YES 
;LOAD CHAR TO BE TYPED INTO DATA REG. 
71S CHARACTER A CARRIAGE RETURN? 
«BRANCH IF NO 

S IYES-~CLEAR CHARACTER COUNT 


scEXI 
:21S CHARACTER A LINE FEED? 
; BRANCH IF YES 
thn THE CHARACTER 
: CHARACTER COUNT STORAGE 


SEQUENCE 


-MJDO01 


:MJDOO1 


;RANOO1 
;RANOO1 
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CKFPACO FPTIF FLTG PNT PRT A 


BINARY TO OCTAL (ASCII) AND TYPE 


5908 


037654 


005204 
052703 
052703 


000002 


000001 
000006 
000005 


037731 


000012 


3 
037730 


177770 


009060 
000040 


037727 


037727 
037731 


- 037726 
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SEQUENC : 


.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
RARER ERE ERE REE RAREEEAEERERERAAEEAERAEERERREHEREER 
“THIS ROUTINE IS USED TO CHANGE A 16=B]i BINARY NUMBER TO A 6=DIGIT 
**OCTAL (ASCII) NUMBER AND TYPE IT 
<e$TYPOS=--ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


2 "CALL: 


NUM , = (SP) 


N 
M 


3 NUMBER TO BE TYPED 
3;CALL_FOR TYPEOUT 
3iN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
73M=1 oe 0 
31=TYPE LEADING ZEROS 
>Z0=SUPPRESS LEADING ZEROS 


‘ #$TYPON-=--ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
S*$TYPOS OR $TYPOC 


S*CALL: 


MOV 


NUM , = (SP) 


NUMBER TO BE TYPED 
32CALL FOR TYPEOUT 


<*$TYPOC=--ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


s*CALL: 


se 
$TYPOS: 


$TYPOC: 
$TYPON: 


1$: 
2$: 


3$: 


4$: 
5$: 


NUM, = (SP) 
a(SP) ,-(SP) 


1(SP) , SOF ILL 
(SP) +, $OMODE +1 


Sono 


SOMODE 


: :NUMBER TO BE TYPED 

:CALL FOR TYPEOUT 
PICKUP THE MODE 
::LOAD ZERO FILL SWITCH 
: NUMBER OF DIGITS TO TYPE 
: ADJUST RETURN ADDRESS 


3:SET THE ZERO FILL SWITCH 
32:SET FOR SIX(6) DIGITS 
33S€T 1" ITERATION COUNT 


32 SAVE RS 
3:GET THE NUMBER OF DIGITS TO TYPE 


3zSUBTRACT IT FOR MAX. ALLOWED 
3zSAVE_ IT FOR US 
3:GET THE ZERO FILL SWITCH 
33PICKUP_THE INPUT NUMBER 
3:CLEAR THE OUTPUT WORD 
7:ROTATE MSB INTO ‘'C’’ 
13% DO MSB 

FORM THIS DIGIT 


3:GET LSB OF THIS DIGIT 
et THIS DIGIT? 


; <BR IF NO 
:GET ‘he OF JUNK 


TEST FOR OQ 
apes Ta 0? 
>:DON'T SUPPRESS ANYMORE 0°S 


7:MAKE THIS DIGIT ASCII 
72MAKE ASCII IF NOT ALREADY 
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CKFPACO FPTIF FLTG PNT ORT A 


BINARY TO OCTAL (ASCII) AND TYPE 


| 
| 
i 
| 
| 


037660 
037664 


037730 


110337 
104401 
A a27 


037724 : MOVB 


637724 TYPE a$ 
037726 7$: DECB —- $OCNT 
BGT 2$ 
BLT 6$ 
INC R4 
BR 
6$: MOV (SP) +,R5 
MOV (SP)+,R4 
MOV ($2) +. R3 
000002 000004 MOV 2(SP) .4(SP) 
MOV (SP) +. (SP) 
RTI 
8$: .RYTE 


SOFILL: .BYTE 


0 
B 0 
$OCNT: .BYTE , 
SOMODE: .WORD 0 
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SEQUENCE 146 


33SAVE FOR TYPING 

+460 TYPE THIS DIGIT 
COUNT BY 1 

: BR IF MORE TO DO 

ae IF DONE 

ey LAST DIGIT ISN'T A BLANK 
:GO DO THE LAST DIGIT 


+ R3 
:SET THE STACK FOR RETURNING 


; ;RETURN 

<OSTORAGE FOR ASCII DIGIT 

; TERMINATOR FOR TYPE ROUTINE 
TOCTAL DIGIT COUNTER 

i: ZERO FILL SWITCH 
[NUMBER OF DIGITS TO TYPE 


CKFPACO FPI1F FLTG PNT PRT A 
CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


5910 


037732 


020200 
000020 
000055 


040146 
000040 


040136 


177777 
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000001 


177777 


‘727776 


. SBTTL 


: #S1GNED DECIMAL (ASCII) NUMBER AND TYPE IT. 


SEQUENCE 


CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


° RARER REAR EEE EERE REAR ARERE REE EAA ARHERAEARREE EE 


>*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5=DIS 


DEPENDING ON WHETHER THE 


>*NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
T*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
; *REPLACED WITH SPACES. 


*CALL: 


oe 
e 


$TYPDS: 


1$: 


2s: 
3$: 


4$: 


5$: 


8$: 


9$: 


NUM, =(SP) 


RO,-(SP) 
R1,-(SP) 


#20200, 2 (sp) 
20(SP),R5 

1$ 

R5 

#'=,1(SP) 

RO 


#SDBLK,R3 
#' ,(R3)¢ 


Re 
oe 


6$ 

At gl -1(R3) 
#'O, R2 

#' R2 

R2, (R3)+ 

(RO) + 

RO,410 

2$ 

8$ 

R5,R2 

(SP) + 

9$ 

ar -2(R3) 


33PUT THE BINARY NUMBER ON THE STACK 
3:GO TO THE ROUTINE 


3zPUSH RO ON STACK 


SIGET THE INPUT NUMBER 
7;BR IF INPUT IS POS. 
; :MAKE THE BINARY NUMBER POS. 
MAKE THE ASCII NUMBER NEG. 
T:ZERO THE CONSTANTS INDEX 
ite ti THE OUTPUT POINTER 
SET THE FIRST noe oe TO A BLANK 


7 FORM THIS BCD DIGIT 
[BR IF DONE 
“TINCREASE THE BCD DIGIT BY 1 


7zADD BACK THE CONSTANT 
3:CHECK IF BCD DIGIT=0 
3:FALL THROUGH IF 0 

‘iar IF oo LEADING 0°S? 


ee 
9 


R IF NO 
:YES=-SEI THE SIGN 
7:MAKE THE BCD DIGIT ASCII 
z2MAKE IT A SPACE IF NOT ALREADY A DIGIT 
PUT THIS CHARACTER IN THE OUTPUT BUFFER 
3:JUST INCREMENT ING 
3:CHECK THE TABLE INDEX 
;:GO DO tan DIGIT 


TO ASCII 
2A i a LSD THE FIRST NON-ZERO? 


IF 

ses eeset THE SIGN FOR TYPING 
:7SET THE TERMINATOR 

7 POP STACK INTO R5 

:zPOP STACK INTO R3 

:zPOP STACK INTO Re 

:2PGe STACK INTO R1 

72P0P STACK INTO RO 

zINOW TYPE THE NUMBER 
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— CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


040124 016666 000002 000004 MOV 2°SP) ,4(SP) ZcADJUST THE STACK 
040132 012616 MOV (SP)*, (SP) 

040134 000002 RTI ;;RETUR! TO USER 
040136 023420 $PTBL: 10000. 

940140 001750 1000. 

040142 000144 100 

040146 000012 10. 

040146 $DBLK: .BiKW 4 


: 


ee eee 


CKEPACO FPIIF FLTG PNT PRT A 
APT COMMUNICATIONS ROUTINE 


5912 


000001 
000001 


000001 


001332 


001332 
001334 
000004 
000004 
000002 
177776 
037140 
040422 
901336 
001316 


040420 
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040422 
040420 


040422 


001336 
001337 


000004 


007316 


040332 
000004 


001320 
000004 


SE QUF NCE 


.SRBTTL APT COMMUNICATIONS ROUTINE 
s CORSA OeReReeAeeRAreeTerenAARAAeAAKeneneenseagarenegseresLegeses 
$ATY1: MOVB #1,$FFLG 7770 REPORT FATAL ERROR 
$AlY¥3: MOVB #1. $MFLG :3TO TYPE A MESSAGE 
BR SATYC 
och y MOVB #1,$FFLG 3270 ONLY REPORT FATAL ERROR 
ATYC: 
MOV RO,-(SP) 7zPUSH RO ON STACK 
V R1,-(SP) 72PUSH Ri ON STACK 
TSTB $M" LG Sy tT TYPE A MESSAGE? 
BEQ 5$ sIF NOT: BR 
CMPB #APTENV, SENV : FOPERAT ING UNDER APT? 
BNE NOT: BR 
BITB #4PTSPOOL , SENVM :} SHOULD SPOOL MESSAGES? 
BEQ 3$ sIF NOT: BR 
MOV a4(SP),RO TiGET MESSAGE ADDR. 
ADD #2,.4(5P) ; BUMP RETURN ADDR. 
1$ TST SMSGTYPE 23 SEE IF DONE W/ LAST XMISSION? 
BNE 1$ SIF NOT: WAIT 
MOV RO, $MSGAD + PUT ADDR IN MAILBOX 
es: TSTB (RO) + zzF IND END OF MESSAGE 
BNE 2$ 
SUB $MSGAD ,RO ;SUB START OF MESSAGE 
ASR RO GET MESSAGE LNGTH IN WORDS 
MOV RO. SMSGLGT PUT LENGTH IN MAILBOX 
~y aor sz TELL APT TU TAKE MSG. 
3$ MOV a4(SP) .4$% :7PUT MSG ADDR IN JSR LINKAGE 
ADD #2,4(SP) -BUMP RETURN ADDRESS 
MOV 177776, =(SP) PUSH 199776 ON STACK 
JSR PC, $TYPE STCALL TYPE MACRO 
> WORD 0 
wer TSTB SFFLG ; SHOULD REPORT FATAL ERROR? 
BEQ 12% zIF NOT: BR 
TST SENV ; RUNNING UNDER APT? 
BEQ 12% zIF NOT BR 
11$: TST oh : ZF INISHED LAST MESSAGE? 
BNE 1$ NOT WAIT 
MOV Hh , mae + :GET ERROR # 
ADD #2.4(SP) ;BUMP RETURN ADDR. 
INC SMSGT YPE *: TELL api TO TAKE ERROR 
12$: CLRB $FFLG ;zCLEAR FATAL FLAG 
CLRB $LFLG zz CLEAR LOG FLAG 
LRB SMFLG CLEAR MESSAGE FLAG 
MOV (SP)+,R1 sPOP STACK INTO R1 
MOV (SP) +,RO 3; :POP STACK INTO RO 
RTS PC ‘2 URN 
$MFLG: .BYTE 0 :zMESSG. FLAG 
$LFLG: .BYTE 0 a5 G FLAG 
SFFLG: .BYTE 0. ZFATAL FLAG 
EVEN 
APTSIZE=200 
APTENV=001 
APTSPOOL =100 
APTCSUP=040 
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CKFPACO FPIIF FLTG PNT PRT A 
TTY INPUT ROUTINE 


5916 


022737 000176 
140504 
140500 
177600 
000007 
001134 
041043 
041050 
000176 


041061 


140422 
140416 
177600 
040534 21627 000025 


041036 
000006 


000100 
037352 
000060 


000067 


6 042726 000060 
000002 


000002 


001140 


000001 


140342 


000001 
140320 


. SBYTL 
VENABL 
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TTY INPUT ROUTINE 


° "Appt ect iaailttaeantlattai aita alae rt Mit 


SB 


SEQUENCE 


: See w adie saabaugtbbeereorennuseneneonsbeenenesensonnsenornennetnl 

+ * SOF TWARE SWITCH REGISTER CHANGE ROUTINE. 

+ *ROUT INE 1S ENTERED FROM THE TRAP HANTLER, AND WILL 

**SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
s*WHEN OPERATING IN TTY FLAG MODE . 


$CKSWR: 


' 
$GTSWR: 
MO 


19$: 


178: 


CMP 


ASWREG, SWR 
15% 
a$TKS 


a$TKB,-(SP) 
#*(177, (SP) 
#7, (SP)+ 
15$ 
$AUTOB, #1 
15$ 

/SCNTLG 

“ $MSWR 
SWREG,-(SP) 
, SMNEW 
=(SP) 


-(SP) 
a$TKS 
7$ 


a@$TKB,-(SP). 


#*C177,(SP) 
(SP) #25 
10$ 


-SCNTLU 
#6,SP 


19$ 

(SP) ,#15 
16$ 

4(SP) 

11$ 

2(SP) ,aSwR 


15$ 
#100, a$TKS 


PC, $TYPEC 
(SP) ,#60 
8$ 


s1S THE SOFT<-SWR SELECTED? 
* BRANCH IF NO 
+7 CHAR THERE ? 

zs IF NO, DON'T WAIT AROUND 
+S SAVE THE CHAR . 
ery kc THE ASCII 

S IT A CONTROL G? 

::NO, RETURN TO USER 

;ARE WE RUNNING IN AUTO=MODE ? 
:IBRANCH IF YES 

coe THE CONTROL-G (“*G) 

TYPE CURRENT CONTENTS 

: ESAVE SWREG FOR TYPEOUT 

:GO TYPE=-OCTAL ASCII(ALL DIGITS) 
* {PROMPT FOR NEW SWR 
:: CLEAR COUNTER 
sz THE NEW SWR 
2 CHAR THERE? 

:IF NOT TRY AGAIN 
PICK UP CHAR 
7iMAKE IT. 7-BIT ASCII 
7218S IT A CONTROL-U? 
; BRANCH IF NOT 
si YES. ECHO CONTROL-U (“U) . 

: IGNORE PREVIOUS INPUT 
SILET'S TRY IT AGAIN 


AND <L*> 
7 RE-ENABLE bs KBD INTERRUPTS? 
> RE-ENABLE TTY KBD INTERRUPTS 


* BRANCH IF YES 


7; BRANCRK IF YES 
z3STRIP-OFF ASCII 
71S THIS THE FIRST CHAR 
S:BRANCH IF YES 
SING, SHIFT PRESENT 
$a CHAR OVER TO MAKE 
; ROOM FOR NEW ONE. 
SZKEEP COUNT OF CHAR 
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TTy INPUT ROUT 
040672 056616 177776 BIS -2(SP), (SP) :7SET IN NEW CHAR 
040676 000707 BR 7$ 3iGET THE NEXT ONE 
040700 10-401 001312 18$: TYPE ,$QUES S TYPE 2<CR><LF> 
0640704 000720 iter 20$ 77 SIMULATE CONTROL=U 
| .DSABL LSB 
FF AMARA AAAAAAAAAAAAAAAAAAAAOARAAAAHRAAAAAARAHAAAARAAAARAAAHARORARAARER 
eS THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
| 5@ Ls 
e RDCHR zz: INPUT A SINGLE CHARACTER FROM THE TTY 
te RETURN HER® :: CHARACTER IS ON THE STACK 
:* s:WITH PARITY BIT STRIPPED OFF 
046706 011646 $RDCHR: MOV (SP) ,=(SP) :zPUSH DOWN THE PC 
040710 016666 006004 000002 MOV 4(SP5,2(SP) *:SAVE THE PS 
040716 105777 140222 1$: 1STB) = @STKS s:WAIT FOR 
040722 100375 BPL 1$ :7A CHARACTER 
040724 117766 140274 000004 MOVB  a$TKB,4(SP) TREAD THE TTY 
349732 042766 177690 000004 BIC #*C<177>,4(SP) ::GET RID OF JUNK IF ANY 
040760 026627 000006 000023 CMP 4(SP) ,#2 ::1S IT A CONTROL-S? 
640746 001013 SNE 3$ + BRANCH IF NO 
040750 105777 140170 2%: TSTP) =—s_ AS TKS t:WAIT FOR A CHARACTER 
040754 100375 BPL 2$ :zLOOP UNTIL ITS THERE 
040756 117746 140164 MOVB  a$TKB,-(SP> >:GET CHARACTER 
040762 042716 177600 BIC #*(177, (SP) [:MAKE IT 7-81T ASCII 
040766 022627 000021 CMP (SP) +,#21 ::1S IT A CONTROL-O? 
040772 001366 BNE 2$ +:1F NOT DISCARD IT 
040774 000750 BR 1$ 77 YES, RESUME 
040776 026627 000004 000021 3$: CMP 4 (SP) ,#$XON *:1S 17 A RANDOM XON? :RANOO1 
041004 001744 BEQ 1$ + :BRANCH IF YES + RANOO1 
041006 026627 000004 000140 CMP 4(SP) #140 +:iS IT UPPER CASE? 
041014 002407 BLT 4$ : BRANCH IF YES 
041016 026627 000004 000175 CMP 4{SP) #175 t:1S IT A SPECIAL CHAR? 
041024 003003 BGT 4$ + BRANCH IF YES 
041026 042766 000040 000004 ; BIC #40,4(SP) S?MAKE IT UPPER CASE 
047034 000002 4$: RT] +:GO BACK TO USER 
041036 136 125 015 $CNILU: .ASCIZ /*U/<15><12> 7 CONTROL “UU 
041063 136 107 015 $CNILG: .ASCIZ /*G/<15><12> 7: CONTROL ‘'G* 
041059 015 012 123 $MSWR: .ASCIZ <15><12>/SWR = / 
041061 040 040 116 $SMNEW: .ASCIZ / NEW = / 


CKFPACO FPTIF FLTG PNT PRT A 


oe ee ey 
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SEQUENCE 152 


FOR THE STARTING ADDRESS 


C 
GET RIGHT BYTE OF TRAP 


TTY TYPEOUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TYPE OCTAL NUMBER (NO LEADING ZEROS) | 
TYPE OCTAL NUMBER (AS PER LAST CALL) 
TYPE DECIMAL NUMBER (WITH SIGN) 

GET SOFT=SWR SETTING 

TEST FOR CHANGE IN SOF T-SWR 

TTY TYPEIN CHARACTER ROUTINE 

SAVE RO-R5 ROUTINE 

RESTORE RO-R5S ROUTINE 

ROUTINE TO RESET STACK AND FPS 


TRAP DECODER 
5916 .SBTTL TRAP DECODER 
. s CRORKeReNeLeReeReeTeLeeeNeonTeHeaaegeaagseNeLegasedeeeaeqsesess 
SS THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘TRAP’ INSTRUCTION 
:*AND USE IT TO INDEX THROUGH THE TRAP TABLE 
7 [*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
| ‘*GO TO THAT ROUT'NE. 
041072 010046 $TRAP: MOV RO, <(SP) ::SAVE RO 
041074 016600 000002 MOV 2(§P) ,RO :2GET TRAP ADDRESS 
041700 005740 TST =(RO) KUP BY 2 
041102 111000 MOVB (RO) ,RO 
041104 006300 ASL RO : POSITION FOR INDEXING 
041106 016000 041126 MOV $TRPAD(RO),RO  :: INDEX TO TABLE 
041112 900200 RTS RO :GO TO ROUTINE 
| THIS IS USE TO HANDLE THE “GETPRI™ MACRO 
041114 011646 $iRAP2: MOV (SP) ,=(SP) ::MOVE THE PC DOWN 
041116 016666 090004 000002 * MOV 4(SP) ,2(SP) ‘MOVE THE PSW DOWN 
041124 000002 | RTI t:RESTORE THE PSW 
.SBITL TRAP TABLE 
;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
teBY THE "'TRAP’’ INST8UCTION. 
; ROUT INE 
041126 0461114 $TRPAD: .WORD  $TRAP2 
941130 037140 $TYPE  :;CALL=TYPE TRAP+1(104401) 
041132 037530 $TYPOC ::CALL=TYPOC TRAP*+2( 104402) 
041134 037504 $TYPOS ::CALL=TYPOS — TRAP+3< 104403) 
041136 037544 S$TYPON ::CALL=TYPON  TRAP+4(104404) 
041140 037732 STYPDS ::CALL=TYPDS — TRAP+5(104405) 
041142 040474 $GTSWR ::CALL=GTSWR —- TRAP+6( 104406) 
041144 040424 $CKSWR ::CALL=C(KSWR _TRAP+7(104407) 
041146 040706 $RDCHR ::CALL=RDCHR  _TRAP+10(104410) 
041150 037044 SSAVREG ::CALL=SAVREG TRAP+11(104411) 
041152 037792 SRESREG ::CALL=RESREG TRAP#+12(104412) 
5917 041154 042154 “RSET: CALL=RSETUP = TRAP#13( 104413) 
5918 000030 $TERM=.-$TRPAD 
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POWEP DOWN AND UP ROUTINES 


5920 .SBTTL POWER DOWN AND UP ROUTINES 
BOTTPTTTTI TITLE 
> POWER DOWN ROUTINE 

ale 041334 000024 $PWRDN: MOV ASILLUP,Q#PWRVEC ;;SET FOR FAST UP 


vw 
Oo 


0411 012 

041164 012737 000340 000026 MOV #340, Q4PWRVEC+2 ;:PRIO:7 

041172 010046 MOV RO,-(SP) 3: zPUSH RO ON STACK 
041174 010146 MOV R1,-(SP) 7 zPUSH R1 ON STACK 
941176 010246 MOV R2,-(SP) : PUSH R2 ON STACK 
041200 079346 MOV R3,-(SP) 3 PUSH R3 ON STACK 
041202 01.446 MOV R4,-(SP) : PUSH R4 ON STACK 
041204 010546 MOV R5,-(SP) es H RS ON STACK 
041206 017746 137726 MOV @SWR,- (SP) 7ZPUSH @SWR ON STACK 
041212 010637 041340 MOV SP, $SAVR6 77 SAVE SP 

041216 012737 041230 000024 MOV #SPWRUP, @APWRVEC. +3SET UP VECTOR 
041224 000000 HALT 

041226 000776 BR 72 3 HANG UP 


SERRA AERAAAERERAAREEERREERAARARREAREARRRERAARRARRAAAAR ERAN ES 


‘POWER UP ROUTINE 


041230 012737 041334 000024 $PwWRUP: MOV #$ILLUP ,a#PWRVEC saat! FOR FAST DOWN 

0412 013706 041340 MOV $SAVR6, SP 3sGET SP 

041242 005037 041340 CLR $SAVR6 ;zWAIT LOOP FOR THE TTY 

041246 005237 041340 1$: INC SSAVR6 3;WAIT FOR THE INC 

041252 001375 BNE 1$ 2 WORD 

041254 012677 137660 MOV (SP) +,@SWR 3zPOP STACK INTO @SWR 

041260 012605 MOV (SP)+,R5 7zPOP STACK INTO R5 

041262 012604 MOV (SP)+,R4 3zPOP STACK INTO R4& 

0412 012603 MOV (SP)+,R3 3:POP STACK INTO R3 

041266 012602 MOV (SP)+,R2 3zPOP STACK INTO R2 

041270 012601 MOV (SP)+,R1 3:POP STACK INTO R1 

041272 012600 MOV (SP) +,RO ;;POP_STACK INTO RO 

041274 012737 941356 900024 MOV #SPWRDN, aAPWRVEC” iZSET UP THE POWER DOWN VECTOR 
041302 12737 000340 000026 MOV #340, a#PWRVE aie 32PRIO:7 

041310 104401 TYPE REPOP” THE POWER FAILURE 
041312 042224 $PWRMG: .WORD POWERM : ;POWER FAIL MESSAGE POINTER 
041314 012716 MOV (PC) +, (SP) SURESTAR( AT START 

041316 003616 $PWRAD: .WORD START 7 ¢RESTART ADDRESS 

041320 042766 000020 000002 BIC #20,2(SP) 7 CLEAR ‘'T’’ BIT 

041326 005037 036162 CLR $TBIT 7:CLEAR THE ‘‘T’’ BIT FLAG 

041332 000002 RTI 

041334 000000 $ILLUP: HALT HE POWER UP SEQUENCE WAS STARTED 
041336 000776 BR 4 33 BEFORE THE POWER DOWN WAS COMPLETE 
C41340 000000 $SAVR6: 0 33PUT THE SP HERE 
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5922 .SBTTL ERROR TYPE OUT ROUTINE 
5923 pp Seneneeenanesennnnntanerieeaennnesiaernene re aanerant 
WUTTTTTTTITILILLLI LLL LLL LLL, 


| 
| 
! 
5924 :*THIS ROUTINE IS CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 
| 


5925 ‘IN THE ERROR MESSAGE DATA TABLE. IT IS CALLED BY THE SERROR ROUTINE 
5926 OR BY FIRST SETTING SITEMB EQUAL TO THE ERROR TABLE ITEM TO BE PRINTED 
5927 ;sOUT AND THEN ECECUTING A: 
5928 : JSR PC ERTYPE 
342 104401 001313 ExTYPE: (YPE _, SCRLF TYPE A CRLF 
5931 041346 113737 001102 001232 MOVB = $TSTNM, STMPO 
5932 041354 042737 177400 00*232 BIC #177400, $TMPO 
5933 041362 013737 001116 001234 MOV —«$ERRPC,$TMP1 =; GET PC OF CALL 
5934 041570 010046 MOV _—RO, = (SP) SAVE RO 
5936 041372 113700 001114 MOVB —- $ITEMB, RO :GET THE ITEM NUMBER 
5937 041376 042700 177400 BIC #177400 ,RO ‘CLEAR UPPER BYTE EXPOSING OFFSET 
5958 041402 001005 BNE 1$ SBRANCH IF OFFSET EXISTS 
5940 041404 013746 001116 MOV $ERRPC,-(SP)  ;1F ZERO THEN JUST 
5941 041410 104402 TYPOC PRINT THE PC 
5942 041412 000157 041740 JMP ERTS 
5944 041416 022700 000377 1$: CMP —s-#377,,RO 
5945 041422 001005 7 BNE 20$ 
5946 047424 016600 000004 MOV 4(SP) ,RO 
5947 041430 011000 MOV (RO) RO 
5948 041432 062700 000400 ADD #400.RO 
5949 041436 010037 001320 20$: MOV ~'f $F ATAL sMOVE ITEM NUMBER TO $FATAL FOR APT ;DPMOO1 
5950 041442 005300 DEC OTHERWISE MAKE RO AN 
5951 041444 006300 ASL RO INDEX FOR THE TABLE 
5952 041446 006300 ASL RO 
5953 041450 006300 ASL RO 
5954 041452 062700 001442 ADD —« #SERRTB.RO 
5956 041456 012037 041466 © 110%: MOV (RO) +,2$ :PICK UP THE ADDRESS OF THE EM, ERROR “té SSAGE 
5957 041462 001404 BEQ 3$ “BRANCH IF NONE 
5958 041464 104401 TYPE 
5959 041466 000000 2$: . WORD 
5960 041470 104401 TYPE 
5961, 041472 001313 .WORD $CRLF 
5963 041474 012037 041504 3$: Mov (RO) +,4$ GET THE DH,DATA HEADER 
5964 041500 001404 BEQ 5$ 
5965 041502 104401 TYPE 
5966 041504 000000 4$: .wORD 0 
5967 041506 104401 TYPE 
5968 v41510 001313 .WORD $CRLF 
5970 041512 010146 5$: MOV R1,-(SP) ;SAVE R1.R2 AND R3 
5971 041514 010246 Mov —-R2.=(SP) 
5972 041516 610346 MOV R3.-(SP) 
5974 041520 912001 MOV (RO) +,R1 :GET THE ADDRESS OF THE DATA TABLE 


gone 041522 001501 BEQ ERTS SRETURN IF NG DAT 
5977 041524 011000 MOV (RO) ,RO ;GET A POINTER TO THE DATA FORMAT TABLE 





pctneieeenereasenieysimenancnemsatneninenen i Scie igesethitetennaeitencn 
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5978 041526 105710 ERT1:  TSTB (RO) sFORMAT ZERO? 
| rida 041530 001003 BNE 8$ sBRANCH IF NOT 

5981 041532 013146 ; MOV a(R1)+,=(SP) :FORMAT zERO SO TYPE 

5982 041534 104402 TYPOC ’ zAN OCTAL NUMBER. 

2983 041536 000465 BR ERT2 

5985 041540 122710 000002 8$: CMPB #2, (RO) sFORMAT TwO? 

2986 041544 001006 BNE 9$ 

5988 041546 013102 MOV @(R1)+,R2 sFORMAT TWO SO TYPE TwO OCTAL NUMBERS 

5989 041550 004737 042054 JSR PC, TOC TNM :TYPE 1 NUMBER 

5990 041554 004737 042054 JSR PC, TOCTNM : TYPE 2ND NUMBER 

ria 041560 000454 BR ERT2 

5993 041562 122710 000003 9$: CMPB #3, (RO) sFORMAT THREE? 

29% 041566 001007 BNE 10$ :BRANCH IF NOT 

> 

5996 041570 013102 MOV a(R1)+,R2 sFORMAT THREE SO TYPE FOUR OCTAL NUMBERS. 

5997 0641572 012703 000004 MOV #4,R3 :TYPE 4 NUMBERS 

5998 041576 004737 042054 90$: JSR PC, TOCTNM :TYPE AN OCTAL NUMBER 

5999 041602 077303 SOB R3,90$ *SUBTRACT 1 AND BRANCH IF NOT DONE 

6000 041604 000442 BR ERT2 

6002 041606 122710 000004 10$: CMPB #4, (RO) :FORMAT FOUR? 

6003 041612 001004 BNE 11$ :BRANCH IF NOT 

6005 041614 013146 MOV a(R1)+,=(SP) :FORMAR FOUR SO TYPE 

6006 041616 104403 TYPOS [AN OCTAL NUMBER 

6007 041620 016 .BYTE 16 ; SUPPRESSING LEADING ZEROES. 

6008 041621 000 BYTE 0 

6009 041622 . 000433 BR ERT2 

6011 041624 122710 000005 11$: CMPB #5, (RO) sFORMAT FIVE? 

601¢ 041630 001005 BNE 13$ 

6014 041632 012137 041640 MOV (R1)+,12% FORMAT FIVE SO TYPE AN 

6015 041636 104401 TYPE sASCIZ STRING. 

6016 041640 000000 12$: .WORD 0 

6017 041642 000425 BR ERT3 

6019 041644 122710 000011 138: CMPB #11, (RO) FORMAT ELEVEN? 

6020 041650 001005 BNE 15$ BRANCH IF NOT 

6021 041652 013137 041660 MOV a(R1)+,14$ -FORMAT ELEVEN SO PICK 

6022 041656 104401 TYPE +A POINTER TO AN ASCIZ 

6023 041660 000000 14$: .WORD 0 + STRING. 

602% 041652 000415 BR ERT3 

6026 041664 122710 000012 15$: CMPB #12, (RO) sFORMAT TWELVE? 

6027 041670 001007 BNE 17$ :BRANCH IF NOT 


6 041704 077303 SOB R3,16$ ;SUBTRACT 1 AND BRANCH IF NOT DONE YET 


6028 
6029 041672 013102 MOV a(R1)+,R2 FORMAT TWELVE SO TYPE 
6030 041674 012703 000006 MOV #6,R3 TYPE SIX OCTAL NUMBERS 
6031 041700 004737 042054 . 168: JSR PC. TOCTNM :TYPE AN OCTAL NUMBER 
041706 000401 ‘BR ERT2 


eT... ke _ _ ee ss ee ______  .....::::::  s: ss: s e  eeee - —— 
= | 


6035 041710 
36 


6037 041712 
6038 041714 
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17$: HALT 
ERT2: TYPE 
. WORD 
tQT3: INC 
TST 
REC 
BR 
ERTS: TYPE 
. WORD 
MOV 
MOV 
MOV 
ERTS: MOV 
RTS 
PFECWS: .WORD 
PFECEM: .ASCIZ 
PFECDH: .ASCIZ 
= VEN 
PFECAD: .WORD 
PFECFT: .BYTE 
TOCTNM: MOV 
TYPOC 
TYPE 
RTS 


PRINT A TAB AFTER TYPING 


$TAB ZAN DATA TABLE ENTRY 

2 OF AL| fORMATS EXCEPT 

5CiZ, FORMATS 5 OR 11 

R ;POINT TO THE NEXT FORMAT 
(ri) sEND OF DATA TABLE. 
ERT4 
ERT) 

DONE. 
SCRLF 
(SP)+,R3 ;RESTORE R1,R2 AND R3 
(SP)+,R2 
(SP) +,R1 
(SP)+,RO sRESTORE RO. 
PC ;AND RETURN. 


PFECEM,PFECDH,PFECAD,PFECFT ;ADRSES OF DATA/ASCII BELOW ;DPMOO1 
?POWER MONITOR BI7 FOUND SET? ;ERROR MESSAGE ;DPMO01 


2TESTNO ERR PC CPUERR? ;ERROR DATA HEADER ;DPMO01 
STESTN, SERRPC,CPSAVE,0 ;ADDRESSES OF DATA ;DPMO01 
-V.U, ;FORMAT’ TABLE ;DPMO01 


(R2)+,=(SP) er THE NUMBER TO THE STACK FOR PRINTING 
TYPE AN OCTAL NUMBER 

~ SPACE ZTYPE A SPACE CHARACTER 

PC TEXIT BACK 


- a 


beh 
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6067 .SBTTL FPP SPURIOUS TRAP TO 244 HANDLER 
6068 


53 PTT rrrrTr rrr TTT rerrrrrrTrT TT TIT TTT TTT ttt ett iti i 
RRR ARERR ERAS ERAEEARERRE EEE ERERAARARAAAAEEEEAEEHERERAREER THEE 


6069 :*THIS ROUTINE HWDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR AT 244. 
6070 S*THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS BEEN RECORDED 
7g ; * THESE ALONG wITH THE FEC, FPS AND PC OF TRAP ARE REPORTED. 
£078 0462066 011637 001236 FP SPUR: MOV (SP) ,STMP2 SAVE PC OF TRAP. 
6074 04207? 022626 CMP (SP)+, (SP)+ ;RESTORE SP. 
6075 042074 170200 STFPS RO ;GET FPS 
6076 042076 010037 001240 MOV RO,STMP3 
6077 042102 170300 STST RO GET FEC 
6078 042106 010037 001242 MOV RO, $TMP4 
6079 042110 104211 1$: ERROR +211 
042112 104413 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH ~ ace (HAS 
THE USER TYPED CONTROL G?) 


6081 042114 000137 035702 JMP $EOP 
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C 13 
CKFPACO FPTIF FLTG PNT PRT A MACRO M1113. 28=MAR=81 12:56 PAGE 68 SEQUENCE 
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6082 .SBTTL CPU SPURIOUS TRAP TO 4 HANDLER 
i 6083 . s LAP AAA ARERR E RAR EAERAAAE ATER ARAARAAAEAAAEHAREAEHEAHEREHEHAS HAE ES 


REET EREAAERAAEEEREREREREAKAKE RHEE HARARE HERS 


T*THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 4. 


| 6085 s 

6086 042120 011637 001236 CPSPUR: MOV (SP) ,STMP2 ; SAVE PC OF RAP. 

6087 042124 022626 CMP (SP) +, (SP) + 

6088 042126 104212 1$: ERROR +212 

6089 042130 104413 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
:THE DESIRE TO CHANGE THE SOFTWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
: THE USER TYPED CONTROL G?). 

6090 042132 000137 035702 JMP $EOP 


—— 
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| 6091 .SBTTL CPU SPURIOUS TRAP TO 10 HANDLER 
6092 , f LER AA AAA AAAARE AERA AAA AREER AAEERERAREEAERRARRREARAARALRRRE EAE ES 
| SL RAR AARARARAARERREERERARARRRRRRRERER REREEEAERAEEETERREKEKRKAEEEe 
| 6093 Z*THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10. 
6095 042136 011637 001236 CPTwO: MOV (SP) ,STMP2 SAVE PC OF TRAP. 
6096 042142 022626 - CMP (SP)+, (SP) + 
6097 042144 104213 1$: ERROR +213 
6098 042146 104413 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
:THE USER TYPED CONTROL 5?). 
6099 042150 000137 035702 JMP $EOP 


SEQUENCE 
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we 
~~ 


LAG RESET AND CONSOLE TEST ROUTINE 
| 6100 .SBTTL FLAG RESET AND CONSOLE TEST ROUTINE 
6101 Z PLAAeNAHRAAeAKeTARARAKAATeAAAReAKeAAtAAAeeAaeKewanesAaeeAeaesenss 
LER RRRR ERA RRA RRA AAERARE AAA AREA ARERR AAA EERARAA ARE E RAH REE R EEE 

| 6102 +*THIS ROUTINE WILL BE CALLED AT THE END OF EACH TEST TO 

| 6103 s*RESET THE STACK, CLEAR THE FPS AND SEE IF THE USER HAS TYPED 

6104 +* CONTROL G ON THE TERMINAL. IF THE USER HAS TYPED CONTROL G AND 
6105 >*THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 
6106 **OF THE SOFTWARE SWITCH REGISTER WILL BE TYPED IN OCTAL ON THE 
oh 44 *TELETYPE AND THE USER CAN MODIFY IT. 
6109 0642154 623727 001140 177570 .RSET: CMP SwR,#177570 SEE 17 THERE IS A PHYSICAL 
6110 CONSOLE SWITCH REGISTER. 
6111 042162 001001 BNE 1$ BRANCH IF NO. 
6112 042164 104407 CKSWR — ————— ZOTHERWISE TYPE THE CONTENTS 
6113 :OF THE PROGRAM VIRTUAL SWITCH REGISTER 
6114 :AND GIVE THE USER A CHANCE TO 
6115 :MODIFY IT. 
6116 042166 012737 042066 000244 1$: MOV #FPSPUR,FPVECT 
6117 042174 012737 042120 000004 MOV #CPSPUR,ERRVECT 
6118 C42202 012737 042136 000010 MOV #CPTWO,10 
6119 042210 011600 MOV (SP),RO . SAVE RETURN ADDRESS. 
6120 042212 012706 001100 MOV #STACK,SP RESET THE STACK POINTER. 
6121 042216 005004 : CLR R4 :CLEAR THE FPS. 
6122 042220 170104 LDFPS RS 
6123 042222 000110 : JMP (RO) ;RETURN. 


aspen 
| 
 CKEPACO FPTTIF FLTG PNT PRT A = MACRO M1113 28=MAR=81 
| SPECIAL MESSAGES 


6124 ~ .SBITL 
6125 042224 200. . 120 177 POWERM: .ASCIZ 
6126 042271 NULL:  .BYTE 
6127 042272 011 $TAB: = .ASCIZ 
6128 042274 040 040 000 SPACE: .ASCIZ 
/ 6129 042277 200 20 103 LFIEX1: .ASCIZ 
6130 042347 200 114 107 LFIEX2: .ASCIZ 
6131 042411 200 106 114 FPSMS: .ASCIZ 
6132 042655 2 106 105 FECMS: .ASCIZ 
6133 042466 124 110 105 $THE: .ASCIZ 
6134 042473 011 040 111 1: .ASCI2Z 
6135 Usc52e2 105 111 124 NOOP15: .ASCII 
6136 042617 200 106 122 NOOP2: .ASCIZ 
| 633? 042634 124 11? 040 NOOP3: .ASCIZ 
6138 042646 200 111 116 NOOP4: .ASCIZ 
6139 042663 200 124 110 NOOPS: .ASCIZ 
6140 042711 011 040 111 NOOP6: .ASCIZ 
6141 042731 =. 011 040 111 NOOP7: .ASCIZ 
6142 042751 040 040 124 NOOP10: .ASCII 
6143 043012 107 117 124 -ASCIZ 
6144 043042 101 040 102 NOOP11: .ASCIZ 
6145 043106 011 114 104 LFPS1: .ASCIZ 
6146 043121 011 114 104 LDI:  .ASCIZ 
6147 043151 011 1146 104 LD2: ~—. ASCIZ 
6148 043162 011 i23 124 STFS1: .ASCIZ 
6149 043175 011 123 124 $T1: .ASCIZ 
6150 043212 011 123 124 $12: .ASCIZ 
6151 043223 011 103 106 CrCC1: .ASCIZ 
6152 043231 O11 123 105 SETF1: .ASCIZ 
6153 043237 011 123 105 SETD1: .ASCIZ 
6154 043245 011 123 105 SETI1: .ASCIZ 
6155 043253 011 123 105 SETL1: .ASCIZ 
6156 043261 011 111 114 ILL1:  .ASCIZ 
6157 043312 011 123 124 STST1: .ASCIZ 
6158 943324 011 111 114 ILL2: .ASCIZ 
6159 045365 040 040 124 ILLMS: .ASCIZ 
6160 043433 105 130 120 MSi:  .ASCIZ 
6161 043445 107 117 124 MS2: .ASCIZ 
6162 043452 103 117 116 MS3: ASCIZ 
6163 043501 040 124 110 MS4: ASCIZ 
6164 043513 1 101 111 MSS: — .ASCIZ 
6165 043555 103 117 116 MS6:° -ASCIZ 
6166 043573 106 122 117, MS?: ~—- ASCIZ 
6167 043607 124 117, MS10: —.ASCIZ 
6168 043622 102 125 124 MS1i: .ASCIZ 
6169 043647 103 117 116 MS12: ASCIZ 
6170 043705 10 125 126 MS13: .ASCIZ 
6171 043722 040 040 124 MS14:  .ASCII 
6172 043763 107 117 124 ASCIZ 
6173 044010 111 116 123 MS15:  .ASCIZ 
6174 044035 117 122 MS16:  .ASCIZ 
6175 044042 124 105 123 MS17: .ASCIZ 
6176 044067 132 105 122 MNUMO: .ASCIZ 
6177 044075 117 116 105 MNUMI: .ASCIZ 
6178 044102 124 127 117 MNUM2: .ASCIZ 
6179 044107 1246 110 122 MNUM3: .ASCIZ 
106 117 125  MNUM4 ASCIZ 


6180 044116 —— 


F 13 
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SPECIAL MESSAGES 
“rabticons FAILURE. PROGRAM RESTARTING. *<CRLF > 


<TAB> 
a a 


<CRLF>*PC OF LAST FPP INSTRUCTION EXECUTED: ‘<TAB> 
<CRLF>*LAST FPP INSTRUCTION EXECUTED: *<TAB> 
<CRLF>'FLOATING POINT STATUS REGISTER: , 

> al Tate . 


<TAB>" INSTRUCTION FAILED. '<CRLF> 

"EITHER A BAD CONSTANT WAS GENERATED OR MICROPROGRAM FLOW WENT’ 
<CRLF>*FROM STATE ° 

"TO STATE ° 

<CRLF>*INSTEAD OF ° 

<CRLF>" THEREBY EXECUTING A ‘ 

<TAB>* INSTEAD OF A ‘ 

<TAB>' INSTRUCTION. '<CRLF> 

* TEST."<TAB>'PC OF CALL.*<TAB>'PC OF ERROP.*<TAB> 
"GOT FPS. EXPECTED FPS. °<CRLF> 

"A BAD CONSTANT MAY HAVE BEEN USED. ‘<CRLF> 
<TAB>'LDFPS'<TAB>'REG' 
<TAB>'LDD'<TAB>' (REG) ,A'<TAB>'//FSRCA&0//" 
<TAB>'LDD'<TAB>'A,A' 

<TAB>'STFPS'<TAB>'REG' 

<TAB>'STD'<TAB>'A, (REG) ° 

<TAB>'STD'<TAB>'A,A' 

<TAB>'CFCC' 

<TAB>'SETF' 

<TAB>'SETD’ 

<TAB>'SETI' 

<TAB>'SETL' 

<TAB>' ILLEGAL FPP INSTRUCTION’ 
<TAB>'STST'<TAB>'REG' 

<TAB> ILLEGAL FPP INSTRUCTION (FID=1)° 

* TEST.*<TAB>'PC OF CALL."<TAB>'PC OF TRAP. *<TAR>'FPS.°<CRLF> 
— . 


"CONTENTS OF LOCATIONS ° 
* THROUGH * 


"FAILURE IN THE MICROPROGRAM FLOw.* 

"CONTROL WENT ° 

‘FROM STATE ° 

* TO STATE ° 

"BUT SHOULD HAVE GONE’ 

"CONTROL FLOW SHOULD HAVE GONE’ 

"BUT DID NOT.’ 

"TEST. "<TAB>*PC OF CALL.'<TAB>"PC OF ERROR, *<TAB> 
"GO; PC."<TAB>*EXPECTED PC. 

" INSTRUCTION TESTED: ° 


"TESTING ACCUMULATOR ° 
"? RO 
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6181 044124 106 141 126 MNUMS: .ASCIZ ‘FIVE ° 
6182 044132 040 040 124 ™S20: wASCIZ * TEST.*<TAB>*PC OF CALL. *<TAB>*PC OF ERROR." 
6183 044173 104 101 124 MS21: «ASCiZ "DATA (FLOATING POINT NUMBER): ° 
6184 044232 114 117 107 MS22: eASCIZ ‘LOGICAL AND OF FAILING ° 
6185 044262 114 117 107 MS2?: eASCIZ "LOGICAL OR OF FAILING ° 
6186 044311 040 040 124 MS26: ASCII ° TEST. *<TAB>'PC OF CALL.*°<TAB>'PC OF ERRORS. '<TAB> 
6187 044353 116 125 115 eASCIZ "NUMBER OF ERRORS(OCTAL).' 
6188 044404 105 130 120 MS25: eASCIZ ‘EXPECTED DATA IN ° 
6189 044426 107 117 124 MS26: ASCIZ ‘GOT DATA IN * 
| 6190 044443 200 101 103 MS27: ASCIZ <CALF>*ACO= ° 
6191 044452 200 101 103 MS30: ASCIZ <CRLF>*ACI= ' 
6192 044461 200 101 103 MS31: eASCIZ <CRLF>*AC2= * 
6193 044470 200 101 103 MS32: ASCIZ <CRLF>*AC3= ° 
6194 044477 200 101 103 MS33: ASCIZ <CRLF>*AC4= ° 
6195 044506 200 101 103 MS34: ASCIZ <CRLF>*ACS= ° 
23 105 124 MS35: ASCIZ -*SET * 
03 114 195 MS36: eASCIZ ‘CLEAR ' 
os 117 191 MS37: eASCIZ ‘LOADED DATA: ° 
22 105 101 MS4O: ASCIZ ‘READ DATA: ' 
05 130 120 ™MS415 ASCIZ ‘EXPECTED DATA: ° 
6201 044603 04 101 124 MS41: ASCIZ ‘DATA IN (RO) FSRC: ° 
6202 044627 04 107 124 MS42: ASCIZ "DATA IN ACO: ° 
6203 044645 07 117 124 MS43: ASCIZ ‘GOT RESULT: ° 
6204 044662 05 130 120 MS44: ASCIZ 2 


"EXPECTED RESULT: ° 


162 
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.SBTTL ERROR MESSAGES 


6206 044704 114 104 106 EMI: “ASCIZ ‘LDFPS AND STFPS TEST FAILED." 
6207 046741 116 104 106 EM2: “ASCIZ. ‘“LDFPS AND STFPS TEST ERROR SUMMARY,' 
| 08 045005 103 106 103 EMS: ,ASC'Z ‘CFCC TRANSFERED BAD DATA TO THE PSw.' 
6209 045052 103 106 lus ths: SASCIZ ‘CFCC MODIFIED THE FPS REGISTER.* 
6210 045112 125 116 105 §—MS: VASCIZ “UNEXPECTED FPP TRAP TO 244." 
| 6211 045146 125 116 105 EM6: VASCIZ “UNEXPECTED CPU TRAP TO 4.’ 
| 6212 0452 125 116 105 £—M7: .ASCIZ “UNEXPECTED CPU TRAP TO 10.° 
| 6213 ( 045112 EMIO=EM:: 
6214 045233 125 116 101 §—M11:  .ASCIZ ‘UNABLE TO DECODE FPP INSTRUCTION. TRAPPED 70 10.° 
| = 6215 000000 EMi 2=0 | 
6216 000000 —M13=0 
6217 045314 114 104 106 EM14: ASCII ‘LDFPS RO FAILED IN THE FSRC FLOWS.° 
6218 045356 040 124 122 ASCII] * TRAPPED TO 4.° 
6219 045376 200 104 111 SASCIZ <CRLF>"DID NOT GO FROM STATE 400 TO 670.° 
6220 045437 123 124 106 €M15: ASCII] ‘STFPS R1 FAILED IN THE FDS? FLOWS.' 
i 045501 040 124 122 -ASCII °* TRAPPED TO 4." 
22 045517 200 104 111 -ASCIZ <CRLF>"DID NOT GO FROM STATE 634 TO 710." 
6223 045562 101 116 040 §—M16: .ASCIZ ‘AN ILLECAL FPP INSTRUCTION DID NOT TRAP.° 
6224 045633 101 116 040 —M17:  . ASCII ‘AN ILLEGAL FPP INSTRUCTION’ 
6225 045665 200 124 122 VASCII <CRLF>* TRAPPED TO 244, BUT FAILED TO SeT * 
6226 045730 124 110 105 “ASCII ‘THE FPS CORRECTLY.*<CRLF>"EITHER A BAD CONSTANT * 
6227 046001 127 101 123 “ASCIZ ‘WAS GENERATED OR THE ALU LOGICAL OR FUNCTION FAILED.* 
6228 04 101 116 040 &EM20 .ASCI] ‘AN ILLEGAL FPP INSTRUCTION’ 
29 046120 040 124 122 .ASCI] ° TRAPPED TO 244, BUT A SUBSEQUENT ° 
230 046162 040 123 124 ASCII * STST*<CRLF> 
6231 046170 106 101 111 “ASCIZ ‘FAILED TO PICK UP THE CORRECT FEC CODE = 2.° 
32 046244 123 124 123. —M?1: ASCII] “STST R& FAILED IN THE DESTINATION FLOWS." 
6233 046314 040 124 122 ASCII °* TRAPPED TO 4.°<CRLF> 
1,234 046333 104 111 104 “ASCIZ "DID NOT GO FROM STATE 636 TO 710." 
6235 046375 101 116 040 EM22: . ASCII ‘AN ILLEGAL FPP INSTRUCTION,’ 
6236 0464 127 117 124 LASCIZ) ‘wiTd INTERRUPTS DISABLED,’ 
6237 04637" EM23=EM22 
6238 046375 EM24=EM22 
6239 046462 123 117 125 —M25:  .ASCII “SOURCE LOCATIONS MODIFIED BY, LDD.° 
6240 046524 2 101 040 -ASCIZ <CRLF>'A DATO WAS PERFORMED INSTEAD OF A DATI.* 
6241 046575 114 104 104 EM26: .ASCII ‘LDD (RO).ACO FAILED. *<CRLFD> 
6242 046622 060 040 .ASCIZ "RO WAS MODIFIED.' 
6243 046575 EM27=EM26 
6244 046643 110 105 EM29: ASCII ‘THE PC WAS BAD AFTER * 
6245 046671 101 176 040 .ASCIZ ‘AN FPP INSTRUCTION." 
6246 046715 123 124 104 €M31: .ASCII ‘STD ACO,(RO) FAILED. *<CRLF> 
6247 046742 122 060 040 .ASCIZ ‘RO WAS MODIFIED.' 
6248 046715 EM32=EM31 
6249 046763 123 124 104 £€M33: ASCII ‘STD ACO,(RO) FAILED. *<CRLF> 
6250 047010 117 125 124 .ASCIZ ‘OUTPUT BAD.* 
6251 047024 123 124 1046 £€M34: ASCII ‘STD ACO,(RO) FAILED IN THE FDST FLOWS." 
6252 047072 200 124 110 “ASCIZ <CRLF>'THE (BUT GR7) FORK FAILED.‘ 
6253 047126 114 104 106 €M35: . ASCII] ‘LDD (RO),ACO FAILED IN THE FSRC FLOWS.° 
6254 047174 124 110 “ASCIZ <CRLF>'THE (BUT GR7) FORK FAILED.° 
6255 047230 123 124 106 €M36: . ASCII ‘STD ACC,(RO) FAILED IN THE FDST FLOWS.” 
6256 047276 124 110 LASCIZ <CRLF>*THE (BUT FD) FORK FAILED." 
6257 047331 114 104 104 £M37: . ASCII ‘“iDD (RO),ACO FAILED IN THE FSRC FiOwS.* 
6258 047377 200 124 110 SASCIZ <CRLF>'THE (BUT FD) FORK FAILED.* 
6259 047432 114 1 104 §€M40: ASCII “LDD (RO),ACO OR THE STD ACO,(RO) FAILED.* 
6269 047502 2 102 101 "ASCIZ <CRLF>"BAD DATA WAS DETECTED AFTER A SEQUENCE OF THE TwO INSTRUCTIONS." 
6261 047603 106 120 123 —€M41: .ASCIZ ‘FPS BAD AFTFR EXECUTION Or: * 


t—— ---- 
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§ 
6307 052424 EM66: 
_ 052425 
£329 052470 EM67 
052670 7 


~ 
—_s 
&* 
~ 
=) 
* 
—y 
b 
ww 
i) 
~ 
MN 


/LDD #NUM,ACO TRANSFERRED BAD DATA,/ 
"LDD @(RO)+,ACO FAILED IN THE FSRC FLOWS." 


oh 
F 
— 
—s 
=) 
~ 
> 
ral 
Oo 
a 
_— 


6266 04676460 EMG2: 
047640 114 104 106 -ASCII /LDD (RO),ACO FAILED IN THE FSRC FLOWS. /<CRLF> 
047707 124 110 105 LASCIZ /THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 
| 6267 0467761 ; EMG3: 
0% 7763 123 126 104 sASCIT /STD ACO,(RO) FAILED IN THE FDST FLOWS./<CRLF> 
050030 124 110 105 “ASCIZ /THE (But FDST) FORK FAILED. TRAPPED 19 4./ 
| 6268 050102 106 120 120 €M44:  .ASCIZ2 ‘FPP ACCUMULATORS DATA TEST FAILED.' 
6269 050102 EMGS=EMG4 
6270 050145 1 120 120 EM46: .ASCIZ ‘FPP ACCUMULATORS DUAL ADDRESSING TEST FAILED.° 
6275 050223 M47 
050223 114 106 040 ASCII /LD AC1,ACO FAILED IN THE FSRC FLOWS./ 
050267 126 130 105 ASCIZ. /THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 
6276 050341 114 106 040 &M50 ASCII "LD AC1,ACO FAILED IN THE FSRC FLOWS. 
6277 05040 126 110 105 SCIZ ‘THE (BUT FD) FORK FAILED. 
6278 050637 114 106 0 §€MS51: .ASCIZ ‘LD AC1,ACO TRANSFERRED BAD DATA. ' 
6288 050500 EMS2: 
050500 114 104 104 -ASCII /LDD (RO)*+,ATU FAILED IN THE FSRC FLOWS./ 
0 12% 110 105 .ASCIZ /THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 
6289 050621 EMSS 
C 1 114 106 154 ASCII /LDD_(RO)+,ACO FAILED. IN. THE FSRC FILOWS./ 
0670 200 122 060 “ASCII <CRLF>'RO WAS BAD. 
050705 105 117 124 -ASCII “EITHER A BAD CONSTANT" was GENERATED OR'<CRLF > 
050754 104 17 104 .ASCIZ \DID NOT GO FROM STATE 627 TO 322.\ 
6290 051076 EMS4: 
051016 11% 104 106 -ASCIZ /LDD (RO)+,ACO TRE“SFERRED BAD DATA./ 
6291 051062 EMSS: 
051062 114 104 104 ASCII /LDD -(RO),ACO FAIL “© IN THE FSRC FLOWS./ 
051137 124 710 105 -ASCIZ /THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 
6292 051203 EMS6: 
051203 114 106 104 -ASCII /LDD =(RO),ACO FAILED ly THE FSRC FLOWS./ 
051252 122 060 "ASCII <CRLF>'RO WAS BAD. 
051267 105 177 124 -ASCII ‘EITHER A BAD CONSTANT. +f GENERATED OR'<CRLF> 
51336 104 111 104 “ASCIZ \DID NOT GO FROM STATE 627 TO 324.\ 
£293 051400 EMS7: 
051400 114 104 104 .ASCIZ /LDD -(RO),ACO TRANSFERRED BAD DATA./ 
6294 051444 EM60: 
051444 114 104 106 .ASCII /LDF (RO)+,ACO FAILED IN THE FSRC FLOWS./ 
051513 200 122 060 -ASCII <CRLF>*RO WAS BAD. *<CRLF> 
051530 105 111 124 “ASCII ‘EITHER A BAD CONSTANT WAS GENERATED OR*<CRLF> 
051577 104 117 104 “ASCIZ. \DID NOT GO FROM STATE 627 TO 322.\ 
6295 051641 EM61 
051641 114 104 106 -ASCIZ /LDF (RO)+,ACO TRANSFERRED BAD DATA./ 
6296 051795 114 104 106 EM62: .ASCII ‘LDF (RO)+,ACO FAILED IN THE FSRC FLOWS." 
6297 051754 200 124 110 “ASCII <CRLF>'THE (BUT FD) FORK FAILED. *<CRLF> 
052007 127 105 116 “ASCII ‘WENT FROM STATE 441 TO 077. °<CRLF> 
052043 171 116 123 “ASCIZ. ‘INSTEAD OF FROM 441 TO 076." 
6300 052077 114 104 104 M63: ASCII ‘LDD #NUM,ACO FAILED IN THE FSRC FLOWS." 
6301 052145 200 124 110 “ASCII <CRLF>'THE (BUT GR7) FORK FAILED. '<CRLF> 
302 052201 127 165 116 “ASCII ‘WENT FROM STATE 207 TO 174, *<CRLF> 
6303 052235 111 116 123 “ASCIZ ‘INSTEAD OF FROM 207 TO 176." 
6304 052271 114 106 104 £—M64: ASCII ‘LDD #NUM,ACO FAILED IN THE FSRC FLOWS. * 
6305 052337 200 101 040 “ASCIZ <CRLF>'A BAD CONSTANT WAS USED WHEN THE PC WAS INCREMENTED. ° 
3C4 052271 EM6S=EM64 
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052540 
052612 
052664 
6330 052721 
952721 
052771 
6331 053044 
053044 
053114 
6332 053146 
053146 
053165 
6333 053222 
053222 
6334 053262 
0 
6335 053513 
0 
6336 053636 
05 
6337 EE ly 


6338 054014 
6339 054054 
054125 
6340 054200 
054200 
6341 054252 


0 
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6344 054543 
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6345 054616 
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6362 054764 
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ASCII 
ASCII 
-ASCIZ 
—EM70: 
ASCII 
EM71: 
ASCII 
EM72: 
ASCII 
-ASCIZ 
—EM73: 
-ASCIZ 
EM74: 
ASCII 
ASCII 
ASCII 
-ASCIZ 
—EM75S: 
ASCII 
-ASCIZ 
EM76: 
ASCII 
-ASCIZ 
EM77: 
ASCII 
-ASCIZ 
€M100: 
-ASCIZ 
EM101: 
ASCII 
-ASC1Z 
EM102: 
ASCII 
ASCIZ 
EM103: 
ASCII 
-ASCIZ 
EM104: 
-ASCIZ 
—M105: 
ASCII 
-ASCIZ 
EM106: 
ASCI1 
ASCIZ 
—M107: 
ASCII 
-ASCIZ 
—M110: 
ASCIZ 
—M111: 
ASCII 
12 


ASC 
—M112=E—M111 
—M113: 
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<CRLF>"THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.° 
<CRLF>\WENT FROM STATE 627 TO EITHER 326 OR 326.\ 
<CRLF>\INSTEAD OF FROM 627 TO %23.\ 


"LDD a(RO)+,ACO FAILED IN THE FSRC FLOWS." 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.° 


*LDD @(RO)+,ACO FAILED IN THE FSRC FLOWS. * 
"THE (BUT FD) FORK FAILED." 


*LDD a(RO)*+,ACO*<CRLF> 
‘FAILED TO INCREMENT RO BY 2." 


"LDD a(RO)+,ACO LOADED BAD DATA." 

"LDD @-(RO),ACO FAILFD IN THE FSRC FLOWS.* 
<CRLF>'THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 
<CRLF>\WENT FROM STATE 627 TO EITHER 326 OR 326,\ 
<CRLF>\INSTEAD OF FROM 627 TO 325.\ 


"LDD @-(RO),ACO FAILED IN THE FSRC FLOWS.’ 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 


"LDD @-(RO),ACO FAILED IN THE FSRC FLOWS." 
"THE (BUT FD) FORK FAILED.' 


"LDD a-(RO) ,ACO*<CRLF> 
"FAILED TO DECREMENT RO BY 2.° 


"LDD a-(RO),ACO LOADED BAD DATA." 


*LDD NUM(RO),ACO FAILED IN THE FSRC FLOWS." 
<CRLF>'THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 


*LDD NUM(RO) ,ACO'<CRLF> 
"FAILED TO AFFECT RO BY 2." 


"LDD NUM(RO),ACO FAILED IN THE FSRC FLOWS." 
"THE (BUT FD) FORK FAILED.' 


"LDD NUM(RO),ACO LOADED BAD DATA.* 


"LDD @NUM(RO),ACO FAILED IN THE FSRC FLOWS." 
<CRLF>'THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.* 


*LDD @NUM(RO) ,ACO'<CRLF > 
"FAILED TO AFFECT RO BY 2.° 


"LDD @NUM(RO),ACO FAILED IN THE FSRC FLOWS." 
"THE (BUT FD) FORK FAILED." 


*LDD @NUM(RO),ACO LOADED BAD DATA," 


/LDD AC7,ACO FAILED TO TRAP TO 244./ 
<CRLF>/AC7 IS AN ILLEGAL ACCUMULATOR. / 


SEQUENCE 


165 
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055066 114 104 106 ASCII /LDD AC6,ACO FAILED TO TRAP TO 264./ 
055180 260 101 103 "ASCIZ <CRLF>/AC6 IS AN ILLEGAL ACCUMULATOR. / 
6365 055066 EM114=EM113 
| 6366 054764 —M115=EM111 
636? 055066 EM116=EM113 
| 6368 055170 EM117: 
055170 125 123 105 LASCI] "USE OF AN ILLEGAL ACCUMULATOR WITH FSRC MODE ZERO," 
055252 200 124 122 “ASCIZ <CRLF>' TRAPPED BUT FAILED TO SET FPS CORRECTLY. * 
6369 055324 EM120 
055324 125 123 105 VASCII "USE OF AN ILLEGAL ACCUMULATOR WITH FSRC MODE ZERO, ° 
055406 200 124 122 “ASCIZ <CRLF>"TRAPPED BUT FAILED TO SET FEC CORRECTLY. ‘ 
6370 055460 123 124 040 EM121: “ASCII ‘ST ACO,AC1 FAILED IN THE FDST FLOWS. 
6371 055524 - 200 134 110 ASCIZ  <CRLF>* THE (BUT FDST) FORK FAILED. TRAPPED TO 4.° 
6372 055577 123 124 040 EM122: ‘ASCII ‘ST ACO,AC1 FAILED IN THE FDST FLOWS." 
6373 055643 200 134 110 “ASCIZ <CRLF>'THE (BUT FD) FORK FAILED. 
6374 055676 123 134 040 Em 25: ASCI2 'ST ACO.AC1 TRANSFERRED BAD DATA." 
055737 106 120 123 ASCII ‘FPS BAD AFTER LDD (RO),ACO.' 
055772 200 124 170 “\SCIZ. <CRLF>\THE (BUT EZBT Y8) FORK FAILED. \ 
6376 056032 EM125 
056032 106 120 123 ASCII] ‘FPS BAD AFTER LDD (RO),ACO.' 
056065 200 124 110 TASCIZ <CRLF>\THE (BUT ENBT) FORK FAILED. \ 
6377 056122 114 104, 104 M126: CASCIT LD. (RO) ,ACO TRAPPED TO 244, 
6378 056156 040 106 123 "ASCIT * FSRC= ~O0 AND FIUV= 0. *<CRLF> 
6379 056205 124 110 105 TASCI] ‘THE (BUT FIUV) FORK FAILED. 
6380 056240 200 127 105 “ASCII <CRLF>'WENT FROM STATE 256 TO 354," 
6381 056274 200 71 116 "ASCIZ <CRLF>*INSTEAD OF FROM 256 TO 254.' 
6382 056331 114 104 104 EMI27: ASCII 'LDD_ (RO) ,ACO FAILED TO TRAP TO 244," 
6383 056374 040 106 123 "ASCII * FSRC= -0, FIUV= 1.° 
6384 056417 200 124 110 “ASCII <CRLF>' THE (BUT FIUv) FOR FAILED. *<CRLF> 
6385 056453 127 105 116 [ASCII ‘WENT FROM STATE 256 TO 254, 
6386 056506 200 11 116 “ASCIZ <CRLF>*INSTEAD OF FROM 256 THE 354." 
6387 056544 114 104 104 £€M130: “ASCII ‘LDD (RO),ACO TRAPPED TO 244, 
6388 056600 106 123 122 "ASCII ‘FSRC= -0. FIUV= 1.°<CRLF> 
6389 056623 102 125 124 “ASCIZ “BUT FEC WAS BAD.* 
6390 056644 EM131: 
956644 114 104 103 -ASCIZ /LDCFD (RO).ACO LOADED BAD DATA./ 
6391 056704 M132: 
056704. 114 104 103 ASCIZ /LDCDF (RO).ACO LOADED BAD DATA./ 
6432 056744 M133: 
056744 101 104 104 ASCIZ /ADDD (RO).ACO WITH (RO)=ACO=0 / 
6433 057003 EM134: 
057003 101 104 104 ASCIZ /ADDF (RO).ACO WITH (RO)=ACO=0 / 
6434 057042 EM135: 
057042 123 125 102 -ASCIZ /SUBD (RO).ACO WITH (RO)=ACO=0 / 
6435 057101 EM136: 
057101 123 125 102 ASCIZ /SUBF (RO).ACO WITH (RO)=ACO=0 / 
6436 056744 EM137=EMi 33 
6437 057003 EM140=EM1 34 
6438 057042 EM141=EM1 35 
6439 057101 EM142=EM1 36 
6440 957140 EM143: 
057140 101 104 104 ASCIZ /ADDD (RO).ACO WITH <RO)=0 / 
6441 057173 EM144: 
057173 123 125 102 -ASCIZ /SUBD (RO),ACO WITH (RO)=0 / 
6442 057140 EM145=EMi4 3 


6443 057173 EM146=EM144 
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6444 057226 
057226 
6445 
6446 
6447 057260 
057260 
6448 
6449 057312 
057312 
6450 057544 
0 
0 
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6452 060214 


360 
6453 0604633 


6454 060640 


061705 
6462 061750 
061750 
062021 
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—EM155: 


AS 
—M156: 


EM157: 


-AS 


AS 
—M160: 


AS 
EM161: 


. 
b> 
nn nn 
DA AAD AANAA ANAAA AAANF 3 


“ASCIZ 
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EM163: 
EM164: 
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—M170: 
ASCII 
eASCIZ 
—EM171: 


ASCII 
ASCII 
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/SUBD (RO),ACO WITH ACO=0 / 


/ADDD (RO),ACO WITH ACO=0 / 


"AN OVERFLOW ERROR OCCURRED ON ADD'<CRI.F> 
"CAUSING A TRAP TO 244, 

<CRLF>' (BUT EZBT Y9 Y8) FORK IN STATE 420 OF OVER\UNDER FAILED." 
<CRLF>*SHOULD HAVE GONE FROM STATE 420 TO 131. 


"AN UNDERFLOW ERROR a fas ON ADD'<CRLF> 
"CAUSING A_ TRAP TO 244 
<CRLF >" (BUT EZBT Y9 Y8) FORK IN STATE 420 * OVER\UNDER FAILED.* 
<CRLF>*SHOULD HAVE GONE FROM STATE 420 TO 131. 
/ADDD (RO), ACO FAILED IN THE ROUND\TRUNK FLOWS./ 
<CRLF>*THE (BUT FD) FORK ny nope WENT" 
\FROM STATE 665 TO 115.\<CRL 
\INSTEAD OF FROM 665 TO 313. \<CRLF>\WITH FT SET.\ 
/ADDD (RU’. ACO FAILED IN THE ROUND\TRUNK FLOWS ./ 
<CRLF>*THE (St'T FD) FORK oe . WENT‘ 
\FROM STATE 665 TO 313.\<CRLF 
\INSTEAD OF FROM 665 TO 113. \<CRt F>\WITH FT CLEAR.\ 
/ADDD (RO),ACO FAILED IN THE ROUND\TRUNK FLOWS./<CRLF> 
"iN THE ROUND ALGORITHM. * 
/ADDF (RO),ACO FAILED IN THE ROUND\TRUNK FLOWS./<CRLF> 
"IN THE ROUND ALGORITHM. * 
/ADDD (RO),ACD PRODUCED A BAD RESULT./ 
/ADDF (RO),ACO PRODUCED A BAD RESULT./ 
\THE FPS WAS BAD AFTER ADDD ‘RO),ACO.\ 
\THE FPS WAS BAD AFTER ADDF (RO),ACO.\ 


ZADDD (RO) ,ACO PRODUCED A BAD RESULT. /<CRLF > 
"PROBABLE ERROR IN THE ALIGN FLOWS.‘ 


/ADDD (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
\FLOW DID NOT FOLLOW THE PATH: Soe 476, T0 111, 
<CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 

"WAS USED IN THE ALIGN ALGORITHM. 


/ADDF (RO), ACO PRODUCED A BAD RESULT ,/<CRLF > 
‘PROBABLE ERROR IN THE ALIGN FLOWS. * 


/ADD® (RO).ACO FAILED IN THE ALIGN FLOWS./<CRLF > 
TO 111, TO O14.\ 


TO 014.\ 


\FLOw DID NOT FOLLOW THE PATH: STATE 476, 





| 
* THE FLOATING CONSTANT WAS USED INSTEAD OF THE DOUBLE CONSTANT*<CRLF> 
‘THE DOUBLE CONSTANT WAS , USED INSTEAD OF THE FLOATING CONSTANT *<CRLF > ! 


167 
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| ERROR MESSAGES 
| 062111 200 101 040 “ASCII <CRLF>\A BAD CONSTANT (NOT 25 DEC) \ 
| 06214 127 101 123 ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' 
| 6463 062207 EM172: 
| 06220 101 104 104 “ASCII /ADDD (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
062260 196 134 117 “ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 015.\ 
062350 200 101 040 “ASCII <CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 
062405 127 101 123 “ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' 
6464 062446 —M173: 
062446 101 104 104 ASCII /ADDD (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
062517 106 114 117 “ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 215.\ 
062607 200 101 040 "ASCII <CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 
062644 127 101 123 “ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ° 
6465 062705 EM174: 
705 101 104 104 "ASCII /ADDF (RO).ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
062756 106 114 117 “ASCII. \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 015.\ 
304 200 101 040 "ASCII <CRLF>\A BAD CONSTANT (NOT 25 DEC) \ 
063103 127 101 123 “ASCIZ. ‘WAS USED IN THE ALIGN ALGORITHM. ° 
6466 063144 EM175: 
063144 101 104 104 -ASCI1 /ADDF (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
663215 106 114 117 “ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 215.\ 
063305 200 101 040 “ASCII <CRLF>\A BAD CONSTANT (NOT 25 DEC) \ 
063342 127 101 123 “ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ° 
6467 063403 —M176: ad 
063403 101 104 104 ASCII ‘ADDD (RO).ACO FAILED IN TH ADD-SUB FLOWS. '<CRLF> 
063456 104 111 104 “ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 442, TO 500.\ 
6468 063540 120 117 127. EM177: .ASCIZ ‘POWER MONITOR BIT FOUND SET‘ 
6469 063574 EM200: 
063574 101 104 104 ASCII] ‘ADDD (RO).ACO FAILED IN THE ADD=SUB FLOWS. *<CRLF> 
063647 104 111 104 “ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 121.\ 
6470 063731 £M201: 
06 3731 101 104 104 ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. *<CRLF> 
064 10% ii 104 “ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 101.\ 
6471 064066 EM202: 
064 101 104 104 ASCII ‘ADDD (RO).ACO FAILED IN THE ADD-SUB FLOWS. *<CRLF> 
06414 104 11 104 “ASCIZ \DID NOT TAKE THE PATH: STATE 216, '0 Ose, TO 101.\ 
6472 064223 EM203: 
06422 101 04 104 ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. *<CRLF> 
104 104 scat 12 \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 141.\ 
101 104 II] ‘ADDD (RO).ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> 
104 2 \DID NOT TAKE THE PATH: STATE 216, TO 042, TO 141.\ 


EM205: 
EM206: 
EM207: 


EM210: .ASC 

EM211=EMS 

EM212=EM6 
6481 EM213=EM7 
6482 065026 EM214: 


124 -ASCIZ \THE FPS WAS BAD AFTER SUBD (RO),.ACO.\ 

/SUBD (RO),ACO PRODUCED A BAD RESULT./ 

*SUBD (RO),ACO PRODUCED A BAD RESULT.* 

<CRLF>*THE XOR OF THE SIGN BIT FAILED IN STATE 924." 
"ADDD (RO),.ACO FAILED IN THE NORMALIZE FLOWS. ° 


ERSKF FF EF 

SIBNe AR A 
BISRFIAEH SS 
—WNNRNUYVIW oO 

RRR 

Mw 

~~ Ss NN 

ep eS hh 

Anr—OWWw 
— = et oy _— —~— 
onnnr — — = 
ern oO — «at 
~— — =" 
Roun BR 
>>> >> > 
nnn nn wn 
OOD aon oO 
ee Re te aml 
NNN 


— 


ee 


Bee 


6491 065477 


6535 
6536 066763 
6537 067023 


SE Se ete 


Ro 
WWAWWO— 


WW 
abv ahvaleal 
WWINANAW 


CKFPACO FPIIF FLTG PNT PRT A 
ERROR MESSAGES 


—— 
—= 


RURWRLRWR 
SNONSOASNS = 


040 
122 


—) -+ —» -2 
—f INMON 
NEO 


Maetidabeichahah «ahead 
—MN—-OOnN-— Of 
NE EOMHWE SS WS 


124 
060 


124 
060 


122 
124 


124 
111 
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DH20: “A 
DH21=DHS- 


oO oO 
Se eee 
PNG me NG ING eR ee ee Ne Bye Rye 


D 

DH31=DH26 

DH32=DH26 

DH33: ASCII 
S$C12Z 


A 
DH34=DH33 
DH35=DH33 
DH36=DH33 
DH37=DH33 
DH40=DH33 





N_13 
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*ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. °<CRLF> 
\DID NOT TAKE THE PATH: STATE 216, TO 042, TO 121.\ 
DATA HEADERS 

* TEST.*<TAB>*PC OF CALL.‘*<TAB>'PC OF ERROR. * 
<TAB>' WROTE. °<TAB>* READ. *<TAB>* EXPECTED. 

" TEST.*°<TAB>'PC OF ay yn, PC OF ERROR.' 

*AND BAD DATA. '<TAB>‘OR BAD DAT 

‘ TEST. *<TAB>'*PC OF CALL. CT ABD? pc , OF ERROR. ° 
<TAB>'READ PSW."<TAB>'EXPECTED PSwW 

* TEST.*<TAB>*PC OF CALL.*<TAB>‘ me OF ERROR. * 
<TAB> "WROTE FPS. *<TAB>' FPS AFTER CFCC. 

* TEST."<TAB>'PC OF CALL.‘<TAB>‘PC OF TRAP." 


* TEST.*<TAB>’ ‘ OF CALL. *<TAB>'PC OF ERROR.' 
<TAB>'OP CODE. FPS. 

* TEST.*<TAB>' pC OF CALL. - My OF ERROR.' 
<TAB>'GOT FPS. *<TAB>* EXPECTED 

* TEST.*<TAB>*PC OF CALL. *<TAB> BC OF TRAP." 
<TAB>*PC OF STST.*<TAB>'READ FEC. 


“FAILED TO CORRECTLY SET FPS.° 

"FAILED TO CORRECTLY SET FEC TO 000002. *<CRLF > 

' TEST. *<TAB>'PC OF CALL. ‘<TAB>* PC OF ERROR. * 

<TAB>*PC OF STST.°<TAB>‘READ FEC. 

* TRAPPED TO 244. FLOW WENT FROM STATE 554 TO STATE 430." 
<CRLF>* INSTEAD OF FROM STATE 554 TO STATE 432.° 

* TEST.*<TAB>*PC OF CALL.‘<TAB>'PC OF ERROR. *<TAB> 

* TEST. *°<TAB>"PC OF CALL.'<TAB>*PC OF ERROR." 

<TAB>'GOT RO.*<TAB>'EXPECTED RO.* 


* TEST, *<TAB>*PC OF CALL.*<TAB>*PC OF ro : 
<TAB>" RO (TARGET LOCATIONS FOR QUTPUT) 


* TEST.*°<TAB>*PC OF CALL.*<TAB>*PC OF TRAP," 
<TAB>'RO (TARGET LOCATIONS FOR OUTPUT)." 


"ERROR SUMMARY, ' 
* TEST.*<TAB>*CALL AT PC.* 


* TEST, *<TAB>'PC OF CALL. *<TAB>*PC OF ERROR." 
<TAB>'WITH FD." 


169 


B14 
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DATA HEADERS 


6538 066763 DH51=DH50 

6539 065533 DH52=DH5 

6540 066425 D'45 3=DH2E 

6541 067035 040 040 124 DH54: .ASCIZ ° TEST.'<TAB>'PC OF CALL.'<TAB>*PC OF ERROR." 

6542 065533 DH55=DH5 

6543 066425 DH56=DH26 

6544 067035 DHS7:DH54 

6545 066425 DH60=DH26 

6546 067035 DH61=DH54 

6547 067035 DH62=DH54 

6548 067035 DHG3=DH54 

6549 067076 122 105 123 DHSS:  .ASCII ‘RESULTING IN AN ODD ADDRESS TRAP TO 4.° 

6550 067144 200 -ASCII <CRLF> 

6551 067145 040 040 124 DH64: .ASCII * TEST. "<TAB>'PC OF CALL. *<TAB>' "PC OF ERROR. . 
117 eASCIZ <TAB>'GOT PC."<TAB>"EXPECTED PC. 


6226 067205 011 107 


| 
| 
| 
6564 065533 DH101=DH5 


655 067035 DH66=DH54 

6554 065533 DH67=DH5 

6555 065533 DH70=DH5 

6556 066363 DH71=DH25 

6557 066425 DH72=DH26 

6558 067035 DH73=DH54 

6559 065533 DH74=DH5 

6560 065533 DH75=DH5 

6561 066363 DH76=DH25 

6262 066425 DH77=DH26 

6555 067035 DH100=DH54 

6565 066425 DH102=DH26 

6566 066363 DH103=DH25 

6567 067035 DH104=DH54 

6568 065533 DH105=DH5 

6569 066425 DH106=DH26 

6570 _ 066363 DH107=DH25 

6571 067035 DH110=DHS4 

6572 066363 DH111=DH25 

6573 067233 124 110 105 DH112: .ASCII ‘THE (BUT FSRC) FORK FAILED. *<CRLF> 

6574 067267 103 117 116 ASCII * CONTROL WENT FROM STATE 762 TO STATE 627. 

6575 067340 111 116 ASCII <CRLF>* INSTEAD OF FROM STATE 762 TO STATE “637. *<CRLF> 
6576 067411 040 040 124 ASCIZ °* TEST.*<TAB>'PC OF CALL.*<TAB>'PC OF ERROR." 
6577 066363 DH113=DH25 

6578 067233 DH114=DH112 

6579 067452 124 110 105 ©H115: .ASCII ‘THE (BUT FSRC) FORK FAILED RESULTING IN AN ODD ADDRESS TRAP TO 4.’ 
6580 067553 200 103 117 .ASCII. <CRLF>*CONTROL WENT FROM STATE 762 TO STATE 627.°<CRLF> 
6581 067626 111 116 123 ASCII “INSTEAD OF FROM STATE 762 TO STATE 627. *<CRLF> 
6582 067676 040 040 124 SASCIZ ° TEST.*<TAB>'PC OF CALL.*<TAB>'PC OF TRAP. 
6583 067452 DH116=DH115 

6584 065653 DH117=DH17 

6585 067736 040 040 1246 DH120: .ASCII ° TEST. *<TAB>'PC OF CALL.*<TAB>* PC OF ERROR.* 
6586 067776 011 107 117 SASCIZ <TAB>'GOT FEC. °<TAR>*EXPECTED FEC. 

6587 065533 DH121=DH5 

6588 066763 DH122=vH50 

6589 066763 DH123=DH5S0 

6590 065653 DH124=DH17 

6591 065653 DH125=DH17 

6592 065533 DH126=DHS 

6593 067035 DH127=DH54 


6594 067736 DH130=DH120 





CKFPACO FPIIF FLTG PNT PRT A 


DATA HEADERS 
659° 067035 
65 067035 


96 
| . €597 070026 106 101 11 
| 6598 070075 040 040 124 


6 070026 
070026 
660 070026 


41 
6602 070136 120 122 117 
6603 070236 040 040 124 
ere 070276 011 107 117 


660 070136 
6606 070136 
6607 070136 
6608 070026 
6609 070026 
6610 0791 36 
6611 070136 
661 067035 


2 
6613 070326 130 117 122 
att! 70356 040 040 124 


6617 070136 
6618 070417 040 040 124 
6619 070417 
6620 067035 
6621 067035 
6622 067035 
6623 067035 
6624 067035 
6625 C67035 
6626 065653 
6627 065653 
6628 067035 
6629 067035 
6630 067035 
6631 067935 
6632 067035 
6633 067035 
6634 067035 
6635 067035 
6636 067035 
6637 070457 040 040 124 
6638 067035 
6639 067035 
6640 067U35 
6641 067035 
6642 067035 
6643 065653 
6644 067035 
6645 067035 
oots 067035 
 G7052> 040 © 040 124 
065533 
S89 065533 
6650 067035 


DH131=DH54 
pet] eames 
DH133: . 


pH? 34=DH7 33 
DH1 35=DH1 33 
pt egnew 2 
DH137: .A 


DH140= pHia>” 
DH141=DH137 
DH142=DH1 37 
DH143=DH133 
DH144=DH1 33 
DH145=DH1 37 
DH146=DH1 37 
DH147=DH54 


DH150: .ASCII 
ASCIZ 


DH151=DH137 
DH152=DH1 33 
DH153=DH137 


SCII 
asc 
SCIZ 
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SCI] 
SC1Z 


DH154: .ASCIZ 


DH155=DH154 
DH156=DH54 
DH157=DH54 
DH160=DH54 
DH161=DH54 
DH162=DH54 
DH163=DH54 
DH164=DH17 
DH165=DH17 
DH166=DH54 
DH167=DH54 
DH170=DH54 
DH171=DH54 
DH172=DH54 


4 
DH211: gASC1Z 


DH213=DH5 
DH214=DH54 


C 14 
12:56 PAGE 73-2 


"FA 
] 


*PRODUCED THE CORRECT RESULT BUT FAILED TO SET THE FPS CORRECTLY.° 


ILED 
TEST 


BE PRODUCE THE CORRECT RESULTS. ‘<CRLF> 


"<TAB>'PC OF CALL.*<TAB>'PC OF ERROR." 


TEST. *<TAB>'PC OF CALL. *<TAB>' PC OF ERROR. 
<TAR>'GOT FPS."<TAB>*EXPECTED FPS. 


*XOR OF SIGN BIT FAILED. *<CRLF> 


TEST. '<TAB>'PC OF CALL.*<TAB>'PC OF ERROR." 


TEST. "<TAB>*PC OF CALL."<TAB>*PC OF TRAP." 


TEST. 


TEST."<TAB>*PC OF CALL."<TAB>'PC OF TRAP, *<TABS*FEC." 


FRR PC 


CPU ERROR REGISTER® 


SEQUENCE 


171 


po re re 


CKFPACO FP11F FLTG PNT PRT A 


DATA FORMATS 
1 
6652 070570 
3 070600 
eee 070610 
6638 070620 


6661 070634 
S606 070666 
6564 
6655 070702 
6606 
6667 070711 


7 
6678 071063 
6679 071111 


6683 071135 
6684 071163 
6685 071177 


6686 
6687 071225 


6692 071370 


3 
94 071406 
6695 071415 
96 


2 
6703 071433 
04 


6706 
6707 071442 


000 


D 14 
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005 


005 


. SBTTL 
DF1: BYTE 
DF 2: BYTE 
DF 3: BYTE 
DF 4=DF3 


DFS: -BYTE 


DF 30: BYTE 
DF 31=DF 26 
DF 32=DF 27 
DF 33: BYTE 
DF 34: BYTE 
DF 35=DF 34 
DF 36=DF 34 
DF 37=DF 34 
DF4O: .BYTE 


DF 64: .BYTE 
DF 65=DF64 
DF 66=DF 54 
DF67=DF 21 
DF 70: BYTE 


SEQUENCE 172 


4.5.11 .5.11,5,5,4,0.5,0,5,0,0 


24545 25,0,5,0.5.12 


*. F * Sa e a 


. 8 
we 


|e 


5353.56 .8.3.5.3,5.3.5.3.505 


5405505550425 0h 


SP PLN LARS 
ee W 
Ww 


4,0,5,0,5,0,0 4 


6 .0.5.0.5 055505 oho dete ee De eho oh 


fv taertnonn nachna ait 
| 


E 14 
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6708 
| 709 071464 000 005 DF72:  .BYTE 4.0,5,0,5,0,0 
6710 71415 DF75=DF 54 
6711 070721 DF 74=DF 21 
| e7i2 071442 DF 7S=DF 70 
671 071442 DF 76=DF 70 
6714 071464 DF77=DF 72 
6715 071415 DF 100=DF $4 
6716 071442 DF 101=DF 70 
6717 071464 DF 102=DF 72 
6718 071442 DF 103=DF 70 
6719 071415 DF 104=DF 54 
6720 071462 DF 105=DF 70 
6721 071464 DF 106=DF 72 
6722 071442 DS 107=DF 70 
6723 071415 DFIIO=DF54. 
6794 071673 00 000 005 DF111: .BYTE 4,0,5,0 
6725 071673 DF112=DF 111 
6726 071473 DF113=DF 1171 
6727 071473 DF114=DF 111 
6798 071473 DF11S=DF111 
6729 071473 DF116=DF111 
6730 070610 DF117=DF3 
6731 070610 DF120=DF 3 
6732 071327 DF121=DF47 
6733 071344 DF122=DF 50 
6734 071370 DF123=DF 51 | 
6735 0714677 ’ 000 005 DF124: .BYTE 4,0.5.0.3.0.0,5.5,3.524.5.46565.5,5.4,5 Me3 250502 
6736 071477 DF 125=DF 124 
6737 071473 DF 126=DF 117 
6738 071473 DF 127=DF 111 
6739 070610 DF 130=DF 3 
6740 071530 000  «005.—«O+DF:31: «BYTE 4,0,5,0,5.54543-5.5.543-545.5.3 
6741 ; 071530 DF 132=DF 131 
£522 071550 206 «= 000-S—S—S«00S-s«iF 138: BYTE —4,0,5,0,5.5,5.3465 454503050505 0345 450503 
6743 071550 DF 134=DF 133 
67464 C.°1550 DF 135=DF 133 
6745 071550 DF 136=DF 133 
6746 07157% 000 005 DF137: .BYTE 4.0.5,0,5.0,5.0 
6747 071574 DF 140=DS 137 
6748 071574 DF 141=DF 137 
6749 071574 DF 142=DF 137 
6750 071550 DF143=DF 133 
6751 071550 DF 144=DF 133 
6752 071574 DF 145=DF 137 
6753 071576 DF 446=DF 137 
6754 071556 DF 147=DF 133 
6755 071550 DF 150=DF 133 
6756 071574 “€151=DF 137 
6757 071550 DF 152=DF 133 
6758 071574 DF 15 3=DF 137 
6759 071604 000 005 DF154: .SYTE 4,0,5.0 
6760 71604 DF155=DF 154 
6761 071550 DF 156=DF 133 
6762 071550 DF 157=DF 133 
6763 071550 DF 160=DF 133 
6764 071610 000 005 DF161: .BYTE 


DATA FORMATS 


071442 
004 


DF 71=DF 70 
F72: 


6.0,5.0.5 5 Sete oSedele dele eletererec 


a a 


CKEPACO FRTIF FLTG PNT PRT A 


DATA FORMATS 


7 
071634 


071637 


Qo 
N 
— 
ia) 
a 


F 14 
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000 


005 


i) 
nn 
— 
ao 


9 
ea] 
SIRINVSLSE SAFER 


nui 


NNN NNNNOGO 
vuouvVvVv7T7T70T077Z 


ehHhnhunnriinhit wit 


= 

a | 

—_ 

N 

N 
WO OB NWO OWN 
WWW? PWG 


-4 
mn 
Ss 
. 

oOo 
2 

oO 


DWWAWWAN WWW 
WH -|<WAWNWA WANA 


TE 4,0,5.0,5,0 


—NoNoe -2-—Ww- | e e e 


we 


SEQUENCE 


174 


| CKEPACO FPTTE ELTG PNT 
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NS 


DATA TABLES 
6793 .SBTTL DATA TABLES 
6794 07166 1 042272 011 “WORD $TMPO,$TMP1,$TAB,$TMP2,$TAB,$IMP3 
6795 071 1 000000 "WORD $TMP4.$TMPS,0 
071670 - 1 042272 DT2: WORD $TMPO,$TMP1,$TAB,AERFLG,$TAB, $TIMP2,$TAB,$IMP3,0 
6797 077712 ° 1 042272 DT3: “WORD  $TMPO.$TMP1.$TAB.STMP2, $TAB, $IMP3 
6798 079726 1 000000 wracit’ "WORD $TAB,$TMP4,0 
6800 071736 042272 DTS: .WORD  $TMPO,$TMP1,$TAB,STMP2,LFIEX1,$TMP21,LFIEX2 
6801 071752 001240 "WORD. $TMP20,FPSMS,$TMP3,FECMS,$TMP4,0 
680g 071766 042272 DT6: "WORD $T™PC,$TMP1,$TAB,$TMP2,LFIEX1,$TMP21 LF IEX2,$TMP20,0 
~ DT7=DT6 
= 6806 071766 DT10=D16 
~ “6805 671766 DT11=DT6 
6806 072010 042466 001252 042473 DT12: .WORD $THE,$TMP10,NOOP1,NOOP15,NOOP2, $TM?5 
6807 072024 9%42634 001246 042646 “WORD NOOP3,$TMP6.NOOP4.NOOP2,$TMP5,NOOP3,$TMP7,NOOPS ,$TMP11 
6HUB 072066 042711 001252 0462731 “WORD NOOP6.$TMP10,NOOP?7,NOUP10,$™MPO,$TMP1,$748,$TMPO 
6809 072066 042272 001240 001242 "WORD $TAB,$TMP3,$TMP4 0 
6B10 072076 062466 001252 042473 DT13:  .WORD $THE.$TMP10,NOOP1,NOOP11,NOOP10,$TMPO,$IMP1,$TAB 
6811 072116 001236 042272 001240 “WORD $TMP2,$TAB,$TMP3,SIMP4,0 
6812 071766 DT14=DT6 
6813 071766 DT15=DT6 
6814 072130 001232 001236 042272 DT16: .WORD $TMPO,$TMP1,$TAB,STMP2,$TAB,$ 45, $TMP3,0 
6815 071712 DT17=DT3 
6816 072150 001232 001234 042272 DI20: .WwORD $TMPO, $11 $TAB,$TMP2,$TAR,STMP3 
6817 072164 042272 001242 000000 "WORD  $TAB,$TMP4,0 
681B 072172 001232 001234 042272 DT21:  :wWORD $TMPO, STMPT, $TAB,$TMP2,0 
6829.072206 065346 001313 DT22: WORD DH3,$CRL 
6820 072210 001232 001234 042272 “WORD $TMPO, sit. $TAB, $TMP2,$TAB, STMP3 
6821 072224 042272 ° 001242 000000 - "WORD $TAB,$TMP4,0 
6822 072232 001232 001234 042272 D123 “wORD $7MPO, srei $TAB, STMP? .$TAB, S$TMP3 
3072266 042272 001242 00 . WORD 3 4B, $TMP4 
6824 072254 043365 __ 4 D124:  .WORD ILLMS 
6825 072256 001232 001234 942272 "WORD $TMPO,$TMP1,$TAB,$TMP2,$TAB,$TMP3 
6826 072272 042272 001242 000000 "WORD  $TAB,$TMP4, 
6827 072300 001232 001234 042272 DT25:  :WORD $TMPO,$TMP1,$TAB,SCRLF .MS1,MS3,$TMP3.MS4,$TMP4,$CRLF 
8 072324 001242 007313 043445 "WORD  $TMP4”$CRLF.MS2,MS3,$TMPS .MS4,$TMP6, $CRLF ,STMPS5 ,0 
6829 072350 001232 001234 042272 D126: :WORD $TMPO.$TMP1.$TAB,$IMP2,$TAB,SIMP3, $TMPé, $cRLi 
30 072370 043555 001313 043573 "WORD  MS6,$CRLF .MS7,$TMP5.MS10,$TMP6,SCRLF -° 
6831 072406 001313 043573 "WORD S11,$CRLF.MS?,$TMP5 .MS10,$TMP7,0 
6832 072426 001232 001234 042272 DT27: :WORD $TMPO,$TMP1,$TAB,STMP2,$TAB,STMP3 
6833 072640 001242 001313 043647 "WORD $TMP4.$CRLF.MS12.$CRLF MS7, STMPS., MS10,$TMP7,$CRLF .MS13,0 
34, 072466 044010 001272 001313 DT30:  .WORD MS15,$TMP20.$CRLF.MS14.$CRL 
6835 072500 001232 001234 042272 WORD STMPO STP. $TAB,$TMP2, Stab. $TMP3 
4836 072514 001242 000000 “WORD  $TMP 
6837 072350 D131=DT26 
6838 072424 DT32=DT27 
6839 072520 001232 001236 042272 DI33:  .WORD $TMPO,$TMP1,$TAB,STMP2,S$TAB,SIMP3 
6840 072534 001313 043433 043452 "WORD  $CRLF.MS1,MS3,$TMP4,.MS4,$TMP5, SCRLF .S7MP6,SCRLF 
6841 072556 043445 043452 001242 "WORD MS2,MS3,$TMP4.MS4,$TMPS .$CRLF .$TMP4,0 
6842 072576 001232 001234 042272 DT34: WORD $TMPO,$TMP1,$TAB,$TMP2,$TAB,SIMP3 
6843 072612 001313 043555 001313 “WORD SCRLF MS6,$CRLF .MS7,$TMPS .MS10,$TMP6, ¢ RLF 
6844 072632 063622 001313 043573 * WORD 1, $CRLFMS7,$TMP5.MS10.$7MP7,0 
6845 072576 D135=D1.34 
6846 072576 DT $6=DT 34 
6847 072576 DT 37=DT 34 
684 072520 DT40=D733 


8 
68469 072650 091272 001313 065346 DI41: WORD $IMP20,SCRLF DHS, SCALP 


—_ <-y 


CKFPACO FRIIF FLTG PNT 


DATA TABLES 


6850 072660 


6854 072740 
6855 

6856 072760 
6857 073002 


6858 073030 
6859 073054 


6866 073214 


6868 073224 
rye 673240 


6871 073262 
6872 273276 


6873 073302 
6874 073324 
6875 


688 | 
6882 073340 
6883 073354 
6884 


6885 
6886 
6887 073360 
6888 073402 


i 073426 


6905 073446 
we 


PRT A 


043433 


001234 
000000 


001234 
000000 


001234 


3607 001246 


001234 


0012%4 


H 14 
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042272 
000 


043705 


042272 
044443 


042272 


042272 
044173 


042272 


042272 
001313 


042272 


042272 


DT4S2: 


DT43=DT42 

DT44: . WORD 
. WORD 

DI45: . WORD 


D146: 


.WOR 
DI4?7: . WORD 
wORD 


DISO=DT34 
D151: - WORD 


. WORD 
DTS2=DT47 
DTS3: ° 

. WORD 
D154: WORD 
WORD 


DI55=D147 
D156=DT53 
DTS7=DT54 
DT60=DT53 
DI61=DT54 
DT62=DT54 
DTE3=DT54 
DT64: . WORD 


. WORD 
DT65=DT64 
DT66=DT54 
DT67=DT21 
D170: 


DT71=D770 
DI72: 


D173=D154 
D174=fPT21 
DT75=vT70 
D176=DT70 


2 —]> OQ 
Soeeeee 
vo vuovVyS 

— 
™N 
Nm 


5°MPO,$TMP1,$1AB,$™MP2,$TAB,SIMP3 

$748, $TMP4 0 

$TMPO,$TMP) ,$TAB, $TMP2,$TAB,$ MP3 

SCRLF /MS6,$CRLF MS7,$TMPS ,MS10,$1M°6, STMP15 STMPTO 
SCRLF LMS11,$CRLF.MS?,$TMP5 .MS10,$TMP7,0 


MS17,$TMP5,$CRLF ,MS20,$CRLF ,$TMPO,$TMP1,$TAB,$TMP2 
$CRLFMS1,MS21,$CRLF,$TMP3, $CRLF ,MS2.MS21,S$CRLF .STMP4 ,0 
MS17,$TMP5, $CRLF .MS24,$CRLF ,$TMPO,$TMP1,$TAB, STMP2, STAB 
$TMP6,$SCRLF ,MS22.MS21,$CRLF ,$STMP3,$CRLF 
MS23,MS21,$CRLF,$TMP4,0 

$TMPO,$TMP1,$CRLF .MS25,MS30,$TMP2,MS31,$7MP3 

MS32,$TMP4 MS 33, $TMP5 MS 34,$TMP6, SCRLF MS26 
MS30.$TMP7.MS31.$TMP10 
MS32.$TMP11,MS33,$1MP12,MS 34, $1MP13,0 
$TMPO,$TMP1.$TAB.$IMP2,$CRLF .MS12,MS7,$TMP3,MS10 

$TMP4 .$CRLF.MS13.0 


$TMPO,STMP1,$TAB,STMP2,$TAB,STMPS 
SCRLF .MS25.MS27,$TMP4,$CRLF .MS26,MS27,$1MP5S,0 


S$TMPO,STMP1,$TAB,$TMP2,$TAB,STMPS 
$1MP 


4, 
$™MPO,STMP1 STAB, STMP2,SCRLF .MS1.MS21,$CRLF ,STMPS 
SCRLF .MS2,MS21,$CRLF ,STMP3,0 


$TMPO,$TMP1,$74B,$1MP2, $TAB,STMPS 
$TMP4 ,0 


STMPO,STMP1 STAB. STMP2, SCRLF .MS6,SCRLF MS7,$TMP5 
MS10,$TMP6,$CRLFMS11,$CRLF .MS7,$TMPS .MS10,$1MP7,0 


STMPO,$TMP1, STAB, STMP2, STAB, STMPS ,STMPS ,0 


STMPO ,STMPT STAB, STMPC,0 
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DATA TABLES 


6916 073460 
6917 073590 
6918 073516 
6919 


2 
073544 
073564 


C73606 
075626 

073646 
29 


073660 
3 


4 
073700 
6 





001234 


001234 
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04227 
04357 
043573 


042272 
001315 


042272 
001313 
001313 


042272 


042272 


wORD 
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Si Niet Meee Meee Meee Meee Nee Bee | —_ap = 
ee i Di Tl DD ee ee i ded 
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=) 
om) 
—_— 
> 
[ODO NAMEWWR —O NAME WWN SONOS 
Lo ] 


WANN NWN YEN WAIANWN WW ONWA NWA WWE WW Ww aM 
WANA SO NW NWANN NIG NO WW -_ “S&S 


St ee 


ocvvvVvVvrVvVvVCTVVCV"9C"C0000  vyoroov0o907 9700 VOUS 
— ee ot td ot ot 8 4 i A Oe ot = 


a tt tt 
NS LIS SSE SST 
Ww 


rpraennrnknnnnnh un tt tt tt ee 


OUWEWH-ON 
—~—_so 

AN AIAANN NWA 
NAAN AANWW 


MS6,$CRLF MS7,$TMP5 .MS10,$TMP6 


STMPO,STMP1 STAB, STMP2,SCRLF .MS37 
SCRLF MS4O,5CRLF STMP4 ,SCRLF .MS41 


§ 


-$TMPO,$TMP1 STAB. SIMP2, STAB. STMP3SIMP4,SCRL 
MS11,3CRLF.MS7,$TMP5.MS10,$TMP7, &CRLF .MS37,$CRLF,$IMP10,0 


L 


SCRLF .STMPS 
S°ALF,STMPS,0 


STMPO,STMP1 STAB, SIMP2,SCRLE .MS41,$CRLF .STMPS 
SCRLF .MS42,$CRLF .STMPS,SCRLF MS43,$CRLt , STMPS 


SCRLF .MS44,$CRLF .STMP6,0 


STMPO,STMP) STAB, STMP2,$TMP10,$TAB,SIMP11,0 


$TMPO,STMP1 STAB, STMP2,0 
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| DATA TABLES 
6964 073712 001232 0012346 036502 D1177: .WORD $1MPO,$TMP1,CPSAVE,0 
6965 073606 DT 200=DT133 
6966 073606 DT201=DT133 
6967 073606 DT 202=DT133 
| 6968 073606 DT203=DT133 
t969 073606 DT204=DT133 
| 6870 071712 DT205=DT3 
6971 073606 D1206=DT 133 
6972 073606 DT207=DT133 
6973 073606 DT210=DT133 
6974 073722 901232 001234 042272 DI211: .WORD $TMPO,$TMP1,$TAB,STMP2,$TAB,$IMP3,0 
6975 073740 001232 001234 042272 DI212:  .WORD $TMPO,$TMP1,S$TAB,S$TMP2,0 
6576 073740 DT213=DT212 
6977 073606 DT214=DT133 
6978 000001 END 
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000000 A6 
000000 A7 
000000 BBDATO 
000000 BBDONE 
BBERO 
000000 BBER1 
BBER10 
000009 BRER11 
000000 BBER2 
0000 BBER3 
0 BBERS 
000000 BBERSO 
000000 BBERS 
BBER6 
004670 BBER7 
000000 BBER8 
BBPATO 
004560 BBPAT1 
004562 BBPAT2 
004574 BBPAT3 
004626 BBPAT4 
000000 BBPATS 
10 BBPAT6 
BRP10 
BBP 11 
000000 BBP7 
000000 BB1 
000 BB10 
000000 11 
000000 BB12 
000000 BB13 
000000 BB14 
000000 BB15 
000000 BB16 
0 BB17 
000000 BB2 
000000 BB20 
BBc ‘ 
000000 BB22 
000040 23 
1 BB24 
000200 BB25 
000100 BB26 
0 BB27 
000000 BB3 
BB30 
8B31 
BB32 
8B335 
BB34 
6B35 
BBS 
5B5 
BBO 
8B7 
BD 
BERR 
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| CKFPACO FPTIF FLTG PNT PRT A MACRO M1113 28-MAR-81 12:56 PAGE 75-5 SEQUENCE 180 
SYMBOL TABLE 
| CRLF = 000200 DD21 033162 DF130 = 070610 DF212 = 071637 DH101 = 065533 
ms 005016 DdD22 «033174 DF131 071530 DF213 = 071637 DH102 = 966425 
C15 005044 DD23 ©: 033230 DF132 = 071530 DF214 = 071550 DH103 = 066363 
| c2 005070 M24 ©: 033252 DF133 071550 DF22 070725 DH104 = 067035 
C25 5104 DD25 033272 DF134 = 071550 DF28 070737 DH105 = 065533 
005132 DD26 =: 033302 DF135 = 071550 DF24 © 070747 DH106 = 066425 
C35 = 905162 DD27 033310 DF136 = 071550 DF25 ©—-070756 DH107 = 066363 
C4 005210 D 032562 DF137 071574 DF26 ©: 071002 DH11_ = 065533 
C45 005222 DD30 033322 DF14 = 070620 DF27 =: 07102 DH110 = 067035 
cs 005250 Db31 «033356 DF140 = 071574 DF3. 070610 DH111 = 3 
C55 005276 DD72 ©: 033400 DF141 = 071574 DF30 ©: 071047 DH112 067233 
005322 DD33 033420 DF142 = 071574 DF31 = 071002 DH113 = 066363 
C65 005 DD34 033430 DF145 = 071550 DF32 = 071027 DH114 = 067233 
c? DD35 DF144 = 071550 DF33 071063 DH115 067452 
C75 005414 DD36 033454 DF145 = 071574 DF 34 071117 DH116 = 067452 
C 005442 DD37 033510 5146 = 071574 DF385 = 077111 DH117 = 065653 
€85 005454 DD38 «=: 033532 DF147 = 071550 DF36 = 971111 DH12_ = 
DDDATO 034400 DD39 «033552 DF15 = 070620 DF37 = 071111 DH120 067736 
DD 034530 DD4 «032602 DF150 = 071550 DFZ = = 07061 DH121 = 065533 
DDERO 633612 DD40 =: 033562 DF151 = 071574 res0 © 077135 DH122 = 066763 
DER? 033630 DD41 033570 DF152 = 071550 DF41 071163 DH123 = 066763 
DDERIO 034246 DD42 0336 DF153 = 071574 DF42 «071177 DH124 = 065653 
DDER11 034304 DDS 032612 DF154 071604 DF43 = 071177 DH125 = 065653 
DDERT2 034342 DD6 =: 032620 ve 155 = O716%% DF44 071225 DH126 = 065533 
R2 033666 DD? ~—s-: 032636 DF156 = 071550 DF45 = 071250 DH127 = 067035 
DDER3 033724 D 032672 DF157 = 071550 DF46 © 071275 DH13_ = 
DDERG 033762 DERRI 0 DF16 070702 DF47 071327 DH130 = 067736 
DDERS 034020 DERR2 1 DF160 = 071550 DFS —-070620 DH131 = 067035 
DDER6 034056 DF1—- 070570 DF161 071610 DF50 ©: 071344 DH132 = 067035 
DDER? 034114 DF10 = 070620 DF162 = 071550 DF51 «671370 DH133 070026 
DDERB 034152 DF100 = 071415 DF163 = 071610 DF52 = 071327 DH134 = 070026 
R9 034210 DF101 = 071442 DF164 = 070610 DF53 071406 DH135 = 070026 
DDISP = 177570 DF102 = 071464 DF165 = 070610 DF54 071415 DH136 = 070026 
0 DF103 = 071442 DF166 = 071550 DF55 = 071327 DH137 070136 
DDPO 034410 DF104 = 071415 DF167 = 071550 DF56 = 0714.6 DH14 = 065533 
DDP1 034420 DF105 = 071442 DF17_ = 070610 DF57 = 071415 DH140 = 070136 
DDP2 034430 DF106 = 071464 DF170 = 071610 DF6. = 070620 DH141 = 070136 
DDP3 034449 DF107 = 071442 DF171 = 071610 DF60 = 071406 DH142 = 070136 
DDP4 034450 DF11_ = 070620 DF172 = 071550 DF61 = 071415 DH143 = 070026 
DDPS «0344 DF110 = 071415 DF173 = 071550 DF62 = 071415 DH144 = 070026 
DDP6 034470 DF111. 071473 DF174 = 071610 DF63 = 071415 DH145 = 070136 
DDP7 034500 DF112 = 071473 DF175 = 071610 DF64 071433 DH146 = 070136 
DDPB_ 034510 DF113 = 071473 DF176 = 071550 DF6S = 071433 DH147 = 067035 
034520 DF114 = 071473 DF177 071634 DF66 = 071415 DHS = 065533 
DD! =: 032504 DF115 = 071473 DF2 070600 DF67 = 070721 DH150 070326 
DD10 «=: 032714 DF116 = 071473 DF20. 070711 DF? = 070620 DH151 = 079136 
Dv11 032724 DF117 = 070610 DF2CO = 071550 DF70 071442 DH152 = 070026 
DD12 ©: 032742 DF12 070634 DF201 = 071550 DF71 = 071442 DH153 = 070136 
DDi3 =: 932776 DF120 = 070610 DF202 = 071550 DF72 071464 DH154 070417 
DD14 033020 DF121 = 071327 DF203 = 071550 DF73. = 071415 DHiSS = 070417 
DD1S 0330 DF122 = 071344 DF204 = 071550 DF74 = 070721 DH156 = 067035 
DD16 ©: 03304 DF123 = 071370 DF205 = 070610 DF75 = 071442 DH157 = 067035 
DD17—«s« 033102 DF124 071477 DF 206 = 071° 9 DF76 = 071442 DH16 ©: 065573 
OD18 =: 033124 DF125 = 071477 DF207 = 071550 DF77 = 071464 DH160 = 067035 
DD19 «033144 DF126 = 071473 DF21 070721 DH1 045163 DH161 = 067035 
2. 032540 DF127 = 071473 DF210 = 071550 DH10_ = 065533 DH162 = 067035 
DD20. 033154 DF13 070666 DF211 071637 DH100 = 067035 DH163 = 067035 
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SYMBOL TABLE 
DH164 = 065653 DHS3 = 425 DT131 §=073544 DT213 = 073740 D4 006026 
DH165 = 065653 DH54 067035 DT132 = 073544 DT214 = 073606 DS 006040 
DHi66 = 067035 DHSS §== 065533 DT133 073606 DT22 072204 D6 006054 
DH167 = 067035 56 = 066425 DT134 = 073606 DT23 072232 D7 006064 
DH17 065653 DH57 = 067035 DT135 = 073606 DT24 072254 D8 134 
DH170 = 067035 = 065533 DT136 = 073606 DT25 072300 D9 00614 
DH177 - 067035 DH60 = 066425 DT137 ~©=©073660 DT26 072350 4 
DH172 = 067035 DH61 = 067035 DT14_ = 071766 DTe7 072424 EEDATO 035232 
DH173 = 067035 DH62 = 067035 DT140 = 073660 DT3 071712 EEDONE 035314 
DH174 = 067035 DH63 = 067035 DT141 = 073660 DT30 072466 EEERO 35024 
DH175 = 067035 DH64 067745 DT142 = 073660 DT31 = 072350 EEER1 035042 
DH176 = 067035 DH65 067076 DT143 = 073606 DT32 = 072424 EEER2 035100 
DH177 = 07045” DH66 = 067035 DT144 = 073606 D133 072520 FEERS 035136 
DH2 065253 DH67 = 065533 DT145 = 073660 DT34 072576 EEERS 035174 
DH20 065743 DH7 = =_: 065533 DT146 = 073660 DT35 = 072576 EE 035242 
DH200 = 067035 DH70 = 065533 DT147 = 073606 DT36 = 072576 EEP1 035254 
DH201 = 067035 DH71 = 066363 DT15 = 071766 D137 == 072576 EEP2 035264 
DH202 = 067035 DH72 = 425 DT150 = 073606 DT4 = 071712 EEP3 025274 
DH203 = 067035 DH73 = 067035 DT151 = 073660 D140 = 072520 EEP4 035304 
DH204 = 067035 DK74 «= 065533 DT152 = 073606 DT41 072650 EERRO 
DH205 = 065653 DH75 = 065533 DT153 = 073660 DT42 072702 EERR1 006310 
DH206 = 067035 DH76 = 63 DT154 073700 DT43. = 072702 EERR2 006324 
DH207 = 067035 DH77 = 066425 DT155 = 073700 DT44 072760 EE1 034534 
DH21 = 065533 DISPLA 001142 DT156 = 073606 DT45 673030 EE10 0347 
DH210 = 067035 DISPRE 000174 DT157 = 073606 DT4é 73104 EE11 034774 
DH211 070523 DPAT3 017322 DT16 072130 D147 073172 EE12 03500 
DH212 = 065533 DSWR = 177570 DT160 = 073606 DT5 071734 EF13 035020 
DH213 = 065533 DT1 071646 DT161 = 06 DT5O = 072576 EE2 034570 
DH214 = 067035 DT10_ = 071766 DT162 = 0736U6 D151 073224 EES 034612 
DH22 31 DT100 = 073302 DT163 = 073606 DT52 073172 EES 034632 
DH23 DT101 = 073360 BTi04 = 071712 D153 073262 EES 034642 
4 066224 DT102 = 073360 DT165 = 071712 DT54 073302 EE6 034650 
DH25 363 DT103 = 073360 DT166 = 073606 DISS = 073172 EE? 034 
066425 DT104 = 073392 DT167 = 073606 D156 = 073262 EE8 034722 
DH27 = 25 DT105 = 073360 DT17_ = Q71712 DIS? = 073302 EE9 034744 
3 065346 DT106 = 073426 DT170 = 073606 DT6 071766 EMTVEC= 30 
DH30 = DT107 = 073360 DT171 = 073606 DT60 = 073262 EM 044704 
DH31 = 066425 DT11_ = 071766 DT172 = 073606 D161 = 073302 EM10 = 045112 
DH32 = 066425 DT110 = 073302 DT1735 = 073606 D162 = 073302 EM100 054014 
066513 DT111 073446 DT174 = 073606 D163 = 073302 —EmM101 54 
= 066513 DT112 = 073446 DT175 = 073606 DT64 073340 EM102 
= 066513 DT113 = 073446 DT176 = 073606 DT65 = 073340 EM105 054252 
= 066513 DT114 = 073446 DT177 —s «073712 D166 = 073302 EM104 054355 
= 066513 DT115 = 073446 DT2 071670 D167 = 072172 EM105 054416 
065437 DT116 = 073446 DT20 072150 DT? = =: 071766 EM106 054545 
= 066513 DT117 = 071712 DT200 = 073606 DT70 073360 EM107 054616 
= DI12 072010 DT201 = 073606 DT71 = 073360 EM11 04 
064616 DT120 = 071712 DT202 = 073406 DT? 73426 EM110 054722 
= 066616 DT121 = 073172 DT203 = 073606 D173 = 073302 EM111 054764 
= DT122 = 072576 = 06 DT74 = 072172 EM112 = 054764 
066720 D123 = 073224 DT205 = 071712 DT75 = 073360 EM115 055066 
066737 DT124 073460 DT296 = 073606 bDT76 = 073360 EM114 = 055066 
= 066720 DT125 = 073460 DT2U7 = 073606 DT77 = 073426 EM115 = 054764 
065533 DT126 = 073446 DT21 072172 DI 005774 EM116 = 055066 
066763 DT127 = 0734 DT210 = 0736 £'0 176 EM117 =055170 
= 066763 D115 072076 D1211 073722 De 006020 Mi2 = 
= 065533 DT130 = 071712 DT212 073740 D3 006022 EM120 055324 
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| SYMBOL TABLE : 

| —M121 «= 055460 EM203 064223 EM73 —s_s« 053222 FFP1 035642 GFIAG2 014756 

| EM122 055577 EM204 064360 EM74 05326 FFF 2 035652 GORO 015010 
EMi23 © 055676 EM205 064515 —M75 —s-« 05351 FFP3 = 035662 GOR1 015012 
EM124 055737 EM206 064562 EM76 3=—s-_—« 05 36 36 FFP4 035672 GOR2 015014 
—M125 EM207 064627 —M77,—s-« 053740 FFI 037 320 GOR 015016 
Mm) 056122 EM21 046244 ERM10 037042 FF10 035500 GPATOO 014760 
EMi27 056 —M210 751 ERROR = 104000 FFI 035510 GPATO1 014762 
EM13 = EM211 = 045112 ERRVEC= 000004 FFQ 035354 GPATO2 014764 
EM130 056544 EM212 = 145146 ERTYPE 041342 FFR 035376 GPATO3 014766 
—M131 0 EM213 = 045200 ERT1 041526 FF4 035404 GPAT10 014770 
FM132 056704 EM214 85026 ERT2 041712 FFS 035414 GPAT11 014772 
—M133 056744 EM22 946375 ERTS 041716 FF6 035450 GPAT12 014774 
EM134 (0571 EM23 = %6375 ERTG 041726 FF? 035472 GPAT13 014776 
—M135 057042 M24 = Uw ERTS 041740 FPSMS 042411 GRESET 014170 
—M136 057101 EM25 FI 006230 FPSPUR 042066 GSETUP 014112 
EM137 = 056744 EM26 =—s_-« 046575 b2 06 FPVECT= 000244 GSUM  =—s-« 014322 
EM14 045314 EM27 = 046575 E3 006244 FXDATO 010240 GS1 014142 
EM140 = 057003 EM3 045095 E4 06246 FXDAT1 010242 GTSWR = 104406 
—M141 = 057042 EM30 = 00446643 FDATIO 010174 FXDAT2 010244 012020 
EM142 = 057101 EM31 046715 FDATI1 010176 FXDAT3 010246 G10 012326 
EM143 057140 EM32 = 046715 FDATI2 010200 FXDAT4 010250 611 012330 
EM144 057173 EM33 =—s-- 046763 FDATI3 010202 FXDATS 010252 G12 012422 
EM145 = 057140 EM34 =: 047024 FDATI4 0102 FXDAT6 010254 613 012454 
EM146 = 057173 EM35 047126 FDATIS 010206 FXDAT? 010256 G14 012456 
EM147 057226 EM36 =—s« 047230 FDATI6 010210 F1 006360 615 012550 
EM15 045437 EM37, «047331 FDATI7, 010212 F10 006602 G16 012602 
—M150 = 057226 EMG 045052 FDATOO 010216 F11 006604 G17 
—M151 = 057726 EM+0 0474 FDATO1 010220 F12 006622 G2 012052 
—M152 2 EMG 1 047603 FDATO2 010222 F13 006654 620 012676 
—M153 = 057260 EM42 047640 FDATO3 010224 F135 006634 G21 012730 
EM154 057312 M43 047761 FDATO4 010226 F14 0066 G22 012732 
EM155 057544 M44 =: 050102 FDATOS 010230 F15 006674 623 013024 
—M156 057777 EM4S = 050102 FDATO6 010232 F16 006704 624 013056 
EM157 060214 EM46 = «50145 FDATO? 010234 F17 006714 625 013060 
EM16 =: 045562 EM467 = 050223 F DONE 10260 F2 006416 626 013152 
—M160 33 EMS 045112 FECMS 04 F20 006724 G27 013204 
EM161 EM5O 3=—-—s05034 1 FERPO 006766 F21 0067 G3 012054 
EM162 061045 EM51 050437 FERR1 007024 F22 006744 G30 013206 
EM163 061112 EMS52 ~—s- 050500 FERR10 007604 F23 006762 G31 00 
EM164 061157 EM53 «05062 i FERR11 00 F3 0064 36 632 013332 
EM165 EM54 ~=—s-—« 051016 FERR2 007122 F4 006440 G33 013334 
EM166 061271 EM55 =: 051062 FERR2O 00 F5 006456 634 013426 
EM167 06 EM56 =—ss« 051203 FERR21 007776 F6 532 G35 013460 
EM17 («045633 EMS7 051400 FERR25 010026 F7 006562 636 613462 
EM170 06164 E 045146 FERR26 010144 GADR 015030 637 013554 
—M171 061750 E 051444 FERR3 007 GANDO 015000 012146 
—M172 062207 EM61 067441 FERRG 007154 GAND1 9015002 G40 013606 
EM173 062446 EM62 =: 051705 FERRS 00,2 GAND2 015004 G41 913610 
EM174 062705 EM63 ~=—s-: 052077 FERR6 007314 GAND3 015006 013702 
EM175 063144 FM64 =: 052277 FERR7 007450 GCME =—s-_-« 014210 643 013734 
EM176 606 EM65 = 052271 FER 0071 GDATOO 015620 G44 013736 
EM177 063540 E 052425 FFDATO 035622 GDATO? 015022 G5 672200 
E 044761 EM67 052470 FFDONE 035702 GDATO2 015024 G6 012202 
EM20 6 EM? FFERO 03551 GDATO3 015026 G7 0122746 
—M200 063574 EM70 ~=—_-: 052721 FFER1 035526 GDONE 015032 HADR 015566 
—M201 063731 EM71 053044 FFER2 035566 GERR1 014236 HAIR 015642 
M202 064066 EM72 =: 053146 FFPQ = 035632 GHLAG? 014754 HAlw 015572 
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SYMBOL TABLE 


| 
HAR 015652 IPAT 20 
| 


011102 KDATIO 017264 MDATO1 020174 MS5 043513 
HAQw 015602 IPAT21 011104 KDATI1 017266 MDATO2 020176 MS6 043555 
| ASR 015642 IPAT22 011106 KDATI2 01727 MDATO3S 020200 MS7 043573 
ASW 015612 IPAT23 011110 KDATI3 017272 MDONE 020202 M1 017656 
HAR 015672 11 010272 KDATOO 017304 MERRO 020026 M15 017676 
HAGw 015622 110 070454 KDATO1 017306 MERR1 020064 M2 017702 
HASR 015702 1105 010462 KDATO2 017510 « MERR2 020000 M3 017704 
4ASW 015632 1106 070456 KDATO3 017312 MERR3 020112 M4 017706 
HCLR 015516 111 010464 KDONE 017324 E= 000214 M5 017742 
HCLR1 015526 112 010472 KERRO 017146 044067 Mo 017746 
CMP 015460 113 010506 KERR1 017212 MNUM1 044075 M7 017756 
HCMP1 §=©015500 114 010550 KERR2 017236 MNUM2 044102 M8 017766 
HCMP2 = 0.15510 115 010552 KPATO 017314 MNUM3 044107 017776 
HDAT? 015712 116 010554 KPAT1 017316 MNUM4 044116 NDATIO 020700 
HDAT2 015722 117 010572 KPAT2 017320 5 44124 NDATI1 0¢0702 
HDAT3 015732 Ie 010310 K1 017040 MPAT10 020152 NDATI2 020704 
HCATS 015742 120 610632 K10 017166 MPAT11 020154 NDATI3 020706 
HDATS 015752 121 010646 Ke 017064 MPAT12 020156 NDATOO 020636 
015762 122 010652 K3 017066 MPAT13 020160 ND“TO1 020640 
HERROR 0©15534 123 010666 K4 017070 MPAT20 020162 NDATO2 020642 
HFLAG 015570 13 010356 K5 017124 MPAT21 020164 NDATO3 4 
HSTD 015402 14 010360 K6 017132 MPAT22 020166 020710 
HT = 15 010362 K7 C17144 MPAT23 020170 NERRO 
41 015044 16 010406 LDATIO 017630 MS1 043433 NERR1 020500 
H10 015306 17 010422 LDATI1 017632 MS10 43607 NERR10 020432 
11 015340 JBUFO 016766 LDATI2 017634 MS11 043622 NERR11 020444 
H12 015372 JBUF1 016770 LDATI3 017636 MS12 043647 NERR2 020534 
H2 015 JBUF2 016772 LDATOO 017642 MS13 043705 NE «R20 
#3 015074 JBUF3 016774 LDATO1 017644 MS14 043722 NERR3 020544 
HS 015146 JDATIO 016776 LDATO2 017646 MSi 044010 NERR4 020554 
H5 015170 JDATI1 017000 LDATO3 017650 MS16 044035 NERRS 020564 
H6 015222 JDATI2 017002 LDONE 017652 MS17 044042 NERR6 020610 
H7 015254 JDATI3 017004 LD1 043121 MS2 043445 1 042473 
IBSAVE 036504 JDATOO 017006 LDe 043151 MS20 04-132 NOOP10 042751 
IDATIO 011122 JDATO. 017016 LERR1 017464 MS21 C44173 NOOP11 043042 
IDATI1 011124 JDATO1 017010 LERR2 017536 MS22 044232 NOOP15 042522 
IDATI2 611126 JDATO2 017012 LERR3 017510 MS23 044262 NOOP2 042617 
IDATI3) 011139 JDATO3 017014 F = 000012 MS24 044311 NOOP3 042634 
IDATOO 011112 JDAT1 017020 LFIEX1 042277 MS25 044404 NOOP4 042646 
IDATO1 011114 JDAT2 017022 LFIEX2 042347 MS26 044426 NOOPS 042663 
IDATO2 011116 JDAT3 017024 LFPS1 043106 MS27 044443 NOOP6 042711 
IDATO$ 011120 JDONE 017026 LOOP 004300 MS3 043452 NOOP7? 042731 
011132 JERRO 016646 LPAT10 017606 MS 30 044452 NPAT10 020670 
IERRO 010672 JERR1 016714 LPAT11 017610 MS31 044461 NPAT11 020672 
IERR1 010754 JERR2 016740 LPAT12 017612 MS32 044470 NPAT12 020674 
IERR2 010774 J1 016540 LPAT13 017614 MS33 044477 NPAT13 020676 
IERR2S 011016 J10 016666 LPAT20 017616 MS 34 044506 NPAT20 020656 
IERR3 011046 Je 016564 LPAT21 017620 MS35 044515 NPAT21 
IERRS 011022 J3 016566 LPAT22 017622 MS 305 044522 NPAT22 020662 
ILLMS 043365 J4 016570 LPAT23 017624 MS 37 044531 NPAT23 
iLt1 043261 J5 016624 L1 017336 MS4 043501 NULL 042271 
ILL2 043324 J6 016632 Le 017376 MS40 044547 N 020206 
IOTVEC= 20 J7 016644 L3 017400 MS41 044603 N10 20340 
IPAT10 011072 KBUFO 017274 L4 017402 MS415 044563 N11 020350 
IPAT11 011074 KBUF1 017276 L5 017452 MS42 044627 N12 020352 
IPAT12 011076 KBUF2 017300 L6 017460 MS43 044645 N13 020366 
IPAT13 011100 KBUF3 017302 MDATOO 020172 MS44 044662 N14 020376 
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CKFPACO FPTIF FLTG PNT PRT A MACRO M1113 28-MAR=81 12:56 PAGE 75-9 SEQUENCE 184 
— -SY"BOL TABLE 


Ne 020232 PDATO3 022066 QERRO 022236 SERR7 016404 TAB = 000011 
| oN3 020234 PDONE 022070 QERR1_ 022502 SETD? 043237 TBITVE= 000014 
NS 020236 PERRO 021536 QERR11 022246 SETF1 043231 TDATIO 011740 
, NS 020254 PERR1 021756 QERR12 022264 SETI1 043245 TDATI1 011742 
| NG 020264 PERR10 021556 QERR13 022302 SETL1 043253 TDATI2 011744 
N7 020274 PERR11 021566 QERR14 022320 SPACE 042274 TDATI3 011746 
| N& 020312 PERRI2 021604 QERR15 022336 SPAT10 016506 TDATOO 011730 
_ NS 020324 PERR13 021622 QERR16 022346 SPAT11 016510 TDATO1 011732 
ODATIO 021404 PERR14 021640 QERR17 022354 SPAT12 016512 TDATO2 011734 
ODATI1 021406 PERRi5 021656 QERR2 022436 SPAT13 016514 TDATOS 011736 
ODATI2 021410 PERR16 021666 QERR20 02.2402 STACK = 001100 TDONE 011750 
ODATI3 021412 PERR17 021674 QERR<1 022412 START 003616 TERRO 011516 
ODATOO 021342 PERR2 O2eo QERR22 022420 STFS1 043162 TERR1 011600 
ODATO1 021344 PERR20 021722 QERRS 022446 STKLMT= 177774 TERR2 011620 
ODATO2 021346 PERR21 021732 QERR4 022454 STST1 043312 TERR2S 011634 
ODATOS 021350 PERR22 021740 QPAT10 022530 ST 043175 TERRS 011664 
ODONE 021474 PFECAD 042040 QPAT11 022532 ST2 043212 TERRS 011646 
OEFRO = 021104 PFECDH 042010 QPAT12 022534 S 00114% TKVEC = 0 
OERR1 021204 PFECEM 041754 QPAT13 022536 SWREG 000176 TOCTNM 042054 
OERRIO 021159 PFECFT 042050 QPAT20 022540 S = 000001 TPAT1O0 011710 
OERR11 021150 PFECWS 041744 QPAT21 022542 SwOO = 000001 TPAT11 011772 
OF RR2 = 021240 PIRQ = 177772 QPAT22 022544 SwO1 = 000002 TPAT12 011714 
OERR2O0 021212 PIRQVE= 000240 QPAT23 022546 sw02 = 000004 TPAT13 011716 
OERRS 021250 POWERM 042224 Q 022074 SwO3 = 000010 YPAT2O 011720 
OERRS 021260 PPAT10 022040 010 022232 Sw0O4 = 000020 TPAT21 011722 
OERRS 021270 PPAT11 022042 Q2 2116 SwOS = 000040 TPAT22 011724 
OERR6 021314 PPAT12 022: 44 Q3 = 022120 SwO6 = 000100 TPAT23 011726 
OPAT1IO 021574 PPAT13 022046 Q4 022122 SwO7 = 000200 TPVEC = 
OPAT11 021376 PROGNU= 000001 Q5 022144 SwO8 = 000400 TRAPVE= 000034 
OPAT12 021400 PRO = 06 022166 swo9 = 001000 TRTVEC= 000014 
OPAT13$ 021402 PRi = 000040 Q7 022776 Sw1_ = = 0C9002 TST1 004300 
OPAT20 021360 PR2 = 000100 08 022210 SW10 = 002000 TST10 =. 34 
OPAT21 021362 PR3 = 000140 Q9g 022224 SWw11 = 004000 TST17 = 011752 
OPAT22 0212%% PRG = 200 RDCHR = 104410 SWw12 = 010000 TST12 015034 
OPAT23 021 PR5 = 000240 RESREG= 104412 SW13 = 020000 TST13 = 015764 
OPAT24 021370 PR6 = 300 RESVEC= 000010 SW14 = 040000 TST14 016530 
01 020714 PR7 = 340 RSETUP= 10° °13 SW15 = 100000 TST15 017030 
010 021044 PS = 177776 =Z00.0 SWw2 = 000004 TST16 =. 7326 
011 021054 PSwW = 177776 R7 =%000007 Sw3 = 000010 TST17 = 017654 
012 021056 PWRVEC= 000024 SADR 016502 Sw4 = = 000020 TST2 
021420 SAVREG= 104411 SWS = = 900940 TST20 04 
P2 021442 OPE = 009004 SW6 = =_- 000100 TST21 020712 
02 P3 = 021444 SDATOO 016516 SW? = 000200 TST22 021416 
P4 021446 SDATO1 015520 Sw8 == 000400 TST23 §©022072 
P5 021470 SDATO2 01652 Sw9 = 001000 TST24 022572 
P6 021512 SDATOS 016524 $1 015766 TST25 023732 
P7 021522 SD 016526 $10 016144 TST26 024530 
P8 02157° SERRO 016206 $11 016170 TST27 34 
QDATIO 22560 SEQR1 016416 $12 016200 TST3 
09 QDATI1 022562 SERR10 016226 $2 016026 TST30 = 025754 
QDATI2 022564 SERR15 016306 $3 016030 TST31 026262 
QDATI3 022566 SERR2 016346 S4 016034 TST32 §©027330 
QDATOO 022550 SERR20 016326 $5 016060 TST33 =: 031146 
QDATO1 022552 SERR3 016372 S6 016070 TST34 032502 
QDATO2 022554 SERRS 016264 $7 016076 TST35 «= 34532 
QDATOS 022556 SERRS 016450 $8 016136 TST36 «= 0.35316 
QDONE 022570 SERR6 = =016360 $9 016140 TST37? =: 038702 
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CKFPACO FPTIF FLTG PNT PRT A MACRO M1113 28-MAR-81 
SYMBOL TABLE 


| TSTS 005744 UPAT41 023710 KERR 
5 00621 


| yet 2 UPATG2 023712 KERRG 
| TST6 006356 UPAT4$ 023714 XPATOO 
TST7 010262 URO™1 023724 XPATOQ1 
TYPDS = 104405 UROM2 023726 KPATO2 
TYPE = 104401 UROM3 023730 XPATO3 
TYPOC = 104402 UTMP1 023720 XPAT10 
TYPON = 104404 UTMP2 023722 XPAT12 
TYPOS = 104403 022610 XPAT13 
71 0111 ul 022640 XPAT20 
710 011304 u10 023216 XPAT21 
7105 011312 U11 023220 XPAT22 
™11 011314 ui2 023252 XPAT23 
T12 011322 u13 023270 x TMP 
13 011336 U14 023322 x1 
T14 011400 uiS 023356 ¥10 
T15 011402 U16 02336 x11 
T16 011404 U2 022710 x12 
Ti? 011422 U3 022742 x13 
T2 011162 023012 X14 
T20 011462 US 023044 x15 
T21 011476 0235114 x16 
T22 011500 U7 023146 x17 
T23 011512 024516 x2 
T3 011230 WDATO1 024520 x20 
™% 011232 WDATO2 024522 X21 
TS 011234 WDATO3 024524 x3 
6 011260 ONE 024526 K4 
17 011274 WPATOO 024506 x5 
023732 WPATO1 024510 x6 
UERRO 023376 WPATO2 024512 x7 
UERR1 023422 WPATO3 024514 YDATOO 
JERR10 23430 WSETUP 024454 YDATO1 
VERR11 023472 Ww 023734 YDATO2 
UERR2 06 w10 024156 YDATO3 
UERR20 023514 wi 024204 YDONE 
UERR21 023556 w12 024240 YERR1 
VERR3 023572 W13 024264 YERR2 
UERR4 023622 W14 024300 YERR3 
UFLAG 023716 w15 024326 YFLAG 
UPATOO w16 024366 YPATOO 
UPATO1 023650 w17 024412 YPATOQ1 
UPATO2 023652 we 023770 YPATO2 
UPATO3 023654 w20 024426 YPATO3 
UPAT10 023656 w3 024014 YPAT10 
UPAT11 023660 w4 024032 YPAT11 
UPAT12 023662 w5 024 YPAT12 
UPAT13 023664 w6 024122 YPAT13 
| UPAT20 023666 w7 024146 YPAT20 
| YPAT21 023670 XAPT11 025324 YPAT21 
UPAT22 023672 XDATOO 025302 YPAT22 
UPAT23 023674 XDATO1 025304 YPATc? 
UPAT30 023676 XDATO2 025306 vrsP) 
UPAT31 023700 XDATOS 025310 yTMP2 
UPAT32 023702 XDONE 025342 vTMP3 
UPAT33 023704 KERR? 025166 v1 
025250 ¥2 


0.15 
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025214 


025422 


025446 


001313 
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| CKFPACO FPIIF FLTG PNT PRT A 
, SYMBOL TABLE 


MACRO M1113 28-MAR-81 


E 15 
12:56 PAGE 75-11 


001172 


001146 


| 

| SMADR2 001354 $PASTM 003610 $REGS 

| $MADR3 001360 $PWRAD 041316 $REGS 

| $MADR4 001364 SPWRDN 041156 $REG6 

| $MAIL 001316 $PWRMG 041312 $REG? 
$MAMS1 001346 $PWRUP 041230 $RESRE 
$MAMS2 001352 $QUES 001312 $RTNAD 
SMAMS3 001356 $RDCHR 040706 $RTRN 
SMAMS4 001362 $RDSZ = 000001 $SAVRE 
$MBADi: 003604 $REGAD 001160 $SAVR6 
$MFLG 040420 $REGO 001162 $SCOPE 
SMNEW 041061 $REG1 001164 $SETUP 
$MSGAD 001332 $REGIO 001202 $STUP 
SMSGLG 001334 $REG11 001204 $SVLAD 
$MSGTY 001316 $REGI2 001206 $SVPC 
$MSWR 041050 $REG13 001210 $SwWR 
$MTYP1 001347 $REGI4 001212 SSWREG 
smty'z 001353 $REGIS 001214 $SWRMK 
$mTYF3 001357 $REGI6 001216 $SWRMS 
$MTYPG 001363 $REGI7 001229 $TAB 
$MXCNT 0636500 $REG2 001166 $TBIT 
$NULL_ 001154 $REG2O 001222 $TERM 
$NwTST= 1 $REG21 001224 $TESTN 
SOCNT 037726 $REG22 001226 $TH 
SOMODE 037730 $REG23 001230 $TIMES 
$OVER 0 $REG3 001170 $TkKB 
$PASS 001324 
. ABS. 073752 900 

000000 001 
ERRORS DETECTED: 0 
VIRTUAL MEMORY USED: 58024 WORDS {227 PAGES) 
DYNAMIC MEMORY: 20034 WORDS ( 77 Paces 
ELAPSED TIME: 00:13:11 
CKFPAC BIN, CKFPAC/CR/=SP/NL : TOC=CKFPAC.MLB/ML , (KFPAC.P11 
| 


001144 


001150 


041072 


SEQUENCE 


186 


F 15 


 CKF RAC CREATED BY MACRO ON 28=MAR=81 AT 13:02 PAGE i 
SEQUENCE 187 
SYMBOL CROSS REFERENCE CREF v01 
| SYMBOL VALUE REFERENCES 
AADATO 027226 49-4891 49-4898 49-4918 49-4925 49-4930 49-4956 49-4963 49-5001 49-5007 
49-5015 49-5021 49-5026 49-5032 #69-5036 ; 
027326 49-4971 49-4991 49-5003 49-5009 49-5017 49-5023 49-5029 49-5035 #49-5044 
AAERRO 26660 49-4883 #49-4975 
AAERR1 026746 49-4902 249-4998 
AAERR2 027002 49-4904 449-5004 
AAERRS 027936 49-4934 #49-5010 
AAERRG 027046 49-4936 449-5012 
AAERRS 027102 49-4938  #49-5018 
AAERR6 027136 49-4967 = #495024 
AAERR7 027172 49-4969  #49-5030 
AAERI0 026754 #49-4999 49-5011 
AAPATO 027236 <o-aeey 49-4912 49-4966 49-4999 49-5005 49-5013 49-5019 49-5025 49-5031 
#6 
AAPAT1 027246 49-4888 49-4915 49-5000 49-5006 49-5014 49-5020 449-5038 
AAPAT2 027256 49-4893 49-4924 49-4962 49-4998 49-5004 #49-5039 
AAPAT3 027266 49-4897 49-4920 49-5010 49-5012 49-5018  #49-5040 
AAPATG 027276 49-4929 #69-5041 
AAPATS 027306 49-4950 49-5024 49-5030 449-5042 
AAPATE 027316 49-4958 49-5027 49-5033 449-5043 
AAI 026264 #49-4880 ; 
AA10 26604 449-4909 
AA11 026440 49-4914 449-4916 
AAl?2 026442 #49-4918 
4A13 026460 #49-4922 49-4939 
AA14 026500 #49-4927 49-4937 
AAS 026520 949-4932 49-4935 
AA16 026526 49-4933 2869-4935 
AAl7 026532 49-4928  #49-4937 
AA2 026326 49-4887 #49-4889 
AA20 026536 49-4923 £#469-4939 
4A21 026540 9649-4943 
AAZ2 026576 49-4949 £#649-4951 
AA23 26600 8649-4953 
AA2Z4 026620 #49-4960 49-4970 
AA25 026640 #49-4965 49-4968 
4A26 026646 49-4966 #49-4968 
AA27 126652 49-4961 #49-4970 
AAZ 026330 #49-4891 
BAG 026346 849-4895 49-4905 
AAS 026 #49-4900 49-4903 
DAG 026374 49-4901 469-4903 
AA? 026402 49-4896 #49-4905 
ABASE = 000000 20-1427 20-1427 
ACDW = 000000 20-1427 20-1427 
ACDW2 = 000000 20-1427 20-1427 
ACPUOP = 000000 20-1427 20-1427 
ACO =%000000 #19-1417 30-1981 30-2020 3=«- # 31-2349 = ® 31-2355 21-2360 *31=2398 = #3. | - 2405 31-2418 
* 32-2523 32-2532 *32-256 32-2575 = 33-2811 33-2871 * 33-2811 33-2811 * 33-2811 
33-2811 *35-2812 33-2812 839 # 335-2812 33-2812 33-2812 33-2812 = 33-2813 33-2813 
* 33-2813 -2813 *33-2814 33-2814 33-2814 32814 39 # 33-2815 33-2815 *33=2815 
33-2815 +*33-2816 33-281 * 33-2816 33-2816 *33-2817 33-2817 3=*# 33-2817 33-. 717 


G 15 
| CKFRAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 2 


) SEQUENCE 188 
SYMBOL CROSS REFERENCE CREF O01 


| SYMBOL VALUE REFERENCES 


a ims th 33-2818  *33-2818 33-2818  *33-2819 33-2819 *33-2819 33-2819 


226=4605 #4646608 «46-4612 46-4628 «= 46-4631 46-4635 847-4712 847-4714 
=68-4807  *48-4B09 48-4813 #49-4886 49-4889 49-4892 #49-4913 — #49-4916 


32-2575 32-2589 # 33-2813. = 33-2813 33-2814 = 33-2814 += * 34-3000 = * 34-3010 

AC2 =%000002 #19-1419 #38-2815 33-2815 * 33-2816 «= 33-2816 = * 34-3001 = * 34-3011 = 34-3026 
ac3. = 4000003 #19-1420  #33-_ 4! 23-5817 #33-2818 33-2818 += * 34-3002 «= * 34-3012 «= 34-3027 
ACS =%000004 #19-1421  #33-2819 33-2819 33-2820 «= 33-2820 = * 34-3003 = 34-3013 = 34-3028 
ACS =%000005 #19-1622 #33-9821 33-2821 33-2822 © 93-2822 #34-3004 = 34-3014 = 34-3029 
ACé % #19-1423 35-3136 
AC? —« =%000007 #19-1624 35-3106 
ADDwC = 000000 20-1427 20-1427 
ADDW1 = 000000 20-1427 20-1427 
ADDWI0 = 000000 20-1427 20-1427 
ADDW11 = 000000 20-1427 20-1427 
ADDW12 = 000000 20-1427 20-1427 
ADDW13 = 000000 20-1427 20=1427 
ADDW14 = 000000 20-1427 20-1427 
ADDW15 = 000000 50-1427 30-1427 
ADDW2 = 000000 “091427, 20-1427 
ADDW3 = 00C900 20-1427 20-1427 
ADDW4 = 000000 20-1427 20-1427 
ADDWS ~ = 000000 20-1427 20-1427 
ADDW6 = 000000 20-1427 20-1427 
ADDW? = 000000 20-1427 20-1427 
ADDW8 = 000000 20-1627 20-1427 

Dw9 = 000000 20-1427 20-1427 
ADEVCT = 000000 20-1427 20-1427 
ADEVM = 000000 20-1427 20-1427 
ADONE 004670 55-1515 951519 25=1527 2541535. 25-1548 = 25-1561 # 25-1567 
AENV — =_- 000000 20-1427 20-1427 
AENVM == 000000 ~~ 20-1627 20" 1427 


AERFLG 004560 25-1465 *25-1496 - 25-1502 2521514 = #251529 75-6796 


a a eee 


CKF RAC «CREATED BY MACRO ON 28=MAR<87 AT cae * PAGF * 


EQUENCE “39 
| SYMBOL CROSS REFERENCE CRef vol 
SYMBOL «VALUE REFERENCES 
AERR 004562 25-1468 425-1532 
AERR2 004574 25-1669 425-1538 
| AERR3 004626 2521673 = #25-1551 
| AFATAL = 20-142 20-1427 
_ AMADRT = 000000 20-1427 20-1427 
| AMADR2 = 000000 20-1427 20-1427 
_ AMADRS = 000000 20-1427 Q=1427 
| AMADRG = 000000 20-1427 20-1427 
| AMAMSi = 000000 20-1427 20-1427 
| AMAMS2 = 000000 20-1427 20-1427 
/ AMAMS3 = 000000 20-1427 20-1427 
| AMAMSG = 000000 20-1427 20-1427 
AMSGAD = 000000 20-1427 20-1427 
AMSGLG’ = 20-1427 20-1427 
AMSGTY = 20-1427 20-1427 
AMTYP1 = 000090 20-1427 20-1427 
AMTYP2 = 20-1427 20-1427 
AMTYP3 = 000000 20-1427 2U=1427 
AMTYP4 = 000000 20-1427 20-1427 
APASS = 000000 20-1427 20-1427 
APRIOR = 20-1427 
APTCSU = 00004C 59-5906 #62-5912 
APTENV = 000001 57-5902 59-5906 62-5912 #62-5912 
APTSI7 = 000200 24-1443 #62-5912 
aPTSPOQ = 000100 59-5906 62-5912 #62-5912 
ASWREG = 000000 20-1427 20-1427 
ATESIN = 20-1427 20-1427 
AUNIT = 000000 20-1427 20-1427 
AUSWR = 000000 20-1427 20-1427 
AVECT1 = 20-1427 20-1427 
AVECT2 = 20-1427 20-1427 
A0S 004476 25-1503 3 9#25-1512 
Al 004350 25-1466 39 #251477 25-1493 25-1506 
All 004 350 #25-1478 25-1538 25-1551 
Al2 004 364 #25-1483 25-1540 25-1553 
A2 004422 #25-1493 25-1512 
A3 004426 25-1491 = #251496 
AG 004474 #25-1510 
AS 004500 25-1494 #25-1514 
6 004526 25-1517 = #25-1521 
A7 552 25-1524 425-1526 , 
BBDATO 032350 51-5326 51-5348 51-5354 51-5378 51-5400 51-5406 51-5428 51-5449 
51-5482 51-5488 51-5497 #51-5506 
BBDONE 032500 51-5459 51-5464 51-5469 51-5475 51-5484 51-5490 51-5499 #51-5517 
BBERO 032036 51-5318 51-5337 51-5365 51-5438 51-5458 #51-5460 
BBER1 032076 51-5332 51-5470 
BBER10 03,°056 51-5388 51-5417 #51-5465 
BRER11 03¢i12 #51-5472 51-5478 57-5502 51-5505 
BRER2 032134 51-5359 #51-5476 
BRE R3 032152 51-5361 39 #5 1-5479 
BERS 032206 51-5384 451-5485 


BRE RSO 032222 #51=-5487 51-5493 


51-5473 


CKFPAC 


CROSS REFERENCE 
VAL 


CREATED BY 


MACRO ON 28=MAR=81 AT 13:02 PA 
—— 190 


REFERENCES 
51-5411 


#19-1415 


RRR 
PUPS SVSTVWSV STIS 


z 


NAA ANU 
OS] NMOMONOGO& 


a 


#51-5419 
#51-5426 


51-5435 
#51-5435 


#26-1604 
33-2914 


19-1415 
19-1415 
19-1415 


3 
51-5480 
51-5495 


35-2922 
56-5900 


GE 4 
EF v1 


Ww WIV ww 


71-5504 
#51-5515 


#51-5514 


33-2938 
56-5900 


I 15 


#51-5507 

51-5455 
#51-5509 
451-5510 
#51=5511 


451-5513 


33-2940 
57-5902 


51-5446 


57-5902 


51-5472 


51-5481 


51-5487 
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CREATED BY MACRO ON 28=MAR=81 AT 13:02 PAGE 5 
SENUENCE 191 
| SYMBOL CROSS REFERENCE CREF v0l 
| SYMBOL VALUE REFERENCES 
| BITO3 = 000019 19-141 19-1415 
| BITOS == 000029 819-1415 19-1415 
| BITOS = 00004 #19='415 19-1415 
| BIT06 = 000100 #19=1415 19-1415 
| BITOr = 000200 #19-1415 19-1415 
B;T08 = 000400 #19-14615 19-1615 56-5900 
BITOY = 001000 #19-1415 19-1415 56-5900 57-5902 57-5902 
BIT1 = 2 #19-1415 
BIT10 = 002000 #19-1615 57-5902 
BIT11 2 000 19-1415 56-5900 
BIT12 = 010000 #19-1615 55-5898 
BIT13 = 020000 #19-1615 57-5902 
BIT?74 = 040000 #19-1415 56-5900 
BIT15 = 100000 #19-1415 
BIT2 = 000004 #19-1415 
= 000010 #19-14615 
= 000020 #79-1415 
= 000040 #19-1615 
= 000100 #19-1615 
= 000200 #19=1415 
= 000400 #19-1615 
= 901006 #19=1415 
= 000014 #19-1615 
004706 26-1576 26-1579 26-1590 
004710 #26-1582 26-1595 
004726 #26-1590 26-1602 26-1608 
031004 50-5066 50-5072 50-5054 50-5100 50-5123 50-5129 50-5152 50-5158 50-5180 
or2 188 50-5208 50-5214 50-5238 50-5244 50-5253 50-5259 50-5265 50-5273 
031144 ne S2e¢ 50-5230 50-5234 50-5240 50-5246 50-5255 50-5261 50-5267 50-5276 
030346 50-5083 50-5111 50-5197 50-5225 #50-5227 
030402 50-5077 #50-5235 
030714 50-5191 #50-5277 
030732 50-5193  #50-5280 
030750 50-5219  #50-5283 
030766 50-5221 #50-5286 
030440 50-5079 #50-524" 
030454 #50-5263 50-5288 
030476 50-5105 #50-5247 
030514 50-5107 #50-5250 
030530 #50-5252 50-5282 
030552 50-5136 #50-5256 
020416 #50-5237 50-5249 50-5279 50-5285 
030566 #50-5258 50-5270 
030606 50-5136 #50-5262 
030642 50-5163 #50-5268 
030660 50-5165 #50-5271 
030364 =0-5140 50-5169 #50-5231 
031014 50-5061 50-5073 50-5089 50-5115 50-5175 50-5203 50-5237 50-5243 50-5252 
50-5258 50-5264 50-5274 #50-5290 
031024 50-5091 50-5101 50-5247 50-5250 #50-5291 





CKF PAC 


SYMBOL gate nr 


cC2 


CREATED BY MACRO ON 28-MAR-81 AT 13: * 


REFFRENCES 
00-5154 


#71-6151 


50-5269 
50-5278 


50-5068 


50-5248 
50-5106 


50-5251 


27-1693 


#27-1793 


caer: 192 


PAGE 6 


450-5298 
#50-5299 


50-5236 
50-5187 
50-5283 
50-5271 
50-5257 
#50=-5297 


27-1734 
27-1721 
27-1783 


vol 


50-5241 


50-5262 


#27-1739 
#27-1761 
#27-1786 


50-5242 
50-5280 
50-5286 


50-5263 


#50=5292 
450-5293 
50-5287 


#50-5296 


#50=5294 





L 15 
CKF PAC CREATED BY MACRO ON 28-MAR=81 AT 15:02 PAGE 7 


[ 
| SEQUENCE 193 
| SYMBOL CROSS REFERENCE CREF  vO1 
SYMBOL VALUE REFERENCES 
| CHPNUM 013772 #33-2832 33-2908 33-2927 
| CKSWR = 104407 56-5900 57-5902 57-5902 #64-5916 70-6112 
CNT = 000214 21-1630 21-1636 21-1436 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
| 1-1 $1-1636 21-1436 21-1636 21-1434 21-1434 21-1434 21-1434 421-1434 
51-1636 31-1636 #271636 21-1434 21-1434 21-1434 21-1434 21-1434 421-1434 
51-1436 3421436 21-1636 21-1634 21-1434 21-1436 21-1434 21-1434 #21-1434 
51-1636 91-1686 21-1636 21-1634 21-1434 21-1434 © 21-1434 21-1434 421-1434 
51-1636 31-1434 21-1634. 21-1634. 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1436 3121436 #21=14636 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1436 31-1636 21-1636 21-1434 21-1434 21-1434 31-1434 21-1434 21-1434 
S1-1436 34214346 21-1636 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
$1-1636 31-1436 27-1634 21-1434 21-1434 21-1434 21-1434 21-1434 421-1434 
51-1436 51216360 1=16436 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1636 37416360 21-1636 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
S1-1634 31-1424 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1636 j= 1636 0 #271=1636 21-1434 21-1434 421-1434 21-1434 21-1434 421-1434 
51-1636 3121436 #21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 421-1434 
51-1636 59-1436) #27-1434 21-1636 21-1434 21-1434 21-1434 21-1434 21-1434 
$1-1434 51-1436 21-1436. 21-1434. 21-1434 21-1436 21-1434 21-1434 #21-1434 
51-1636 31-1435 21-1636 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1636 31-1636 #21-1636 21-1434 21-1434 21-1434 21-1436 21-1434 21-1434 
31-1436 31-1436 21-1636. 21-1436 21-1434 21-1436 21-1434 21-1434 21-1434 
51-1636 31-1436 21-1634. 21-1634 21-1434 21-1434 21-1434 21-1434 421-1434 
51-1636 31-1436) #211634. 21-1634 21-1434. 21-1434 21-1434 21-1434 #21-1434 
51-1436 31-1636 21-1636. 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1634 31-1436 21-1436. 21-1434 21-1434 21-1434 21-1434 21-1434 #21-1434 
31-1436 31-1636 #271-1636 21-1436 21-1434 421-1434 21-1434 21-1434 21-1434 
51-1636 31-1436 27-1434. 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1436 31-1636 #21-16346 27-1436 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1636 31-1636 21-1434. 21-1436 21-7434 21-1434 21-1434 21-1434 21-1434 
21-1434 21-1434 421-1634 21-1434 21-1434 #21-1434 21-1434 21-1434 #21-1434 
51634 31-1634 #271636 21-1434 21-1636 21-1434 21-1434 21-1434 21-1434 
21-1686 31-1434 #211436. 21-1634 21-1434 421-1434 21-1434 21-1434 21-1434 
51-1436 31-1436 21-1636. 21-1434 21-1434 21-1434 21-1434 21-1434 421-1434 
51-1436 31-1436. -#271-1636 21-1636 21-1434 27-1434 21-1434 21-1434 21-1434 
51-1634 31-1434. 27-1436 21-1634 21-1434 21-1434 21-1434 © 21-1434 #21-1434 
51-1636 31-1636 -#271-1636 21-1636 21-1434 21-1434 21-1434 © 21-1434 -#21-1434 
51-1436 31-1436 21-1636 21-1436 21214634 21-1434 21-1436 21-1434 421-1434 
51-1436 31-1436 21-1634 31-1636 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1436 391216360 21-1434 274143460 21-1434 21-1434 21-1434 21-1434 21-1434 
51-1436 31-1436 21-1636 21-1634. 21-1434 21-1434 21-1434 21-1434 #21-1434 
$1-1436 31-1436 21-1634 21-1634 21-1434 21-1434 21-1434 21-1434 #21-1434 
51-1636 31-1636 0 21-1634. 21-143G 21214634 21-1434 21-1434 21-1434 21-1434 
S1-1436 312163860 21-1434 31-1636 21-1636 21-1434 21-1436 21-1434 21-1434 
21-1634 21-1434 421-1434 21-1434 21-1434 #2 1-1434 21-1434 21-1434 #21-1434 
51-1436 31-1636 21-1436 23-1636 21-1434 21-1434 21-1434 21-1434 #21-1434 
51-1636 51-1436 #21-1636 21-1636 27-1434 21-1434 21-1436 21-1434 421-1434 
31-1636 31-1636 #271-1636 21-1636 21-1434 21-1434 21-1436 21-1434 #21-1434 
51-1636 0 21-1636 0 21-1636 212143Q 0 21-1434 21-1434 21-1434 
CPC 005740 057-1789. 37-1791 827-1795 «= 27-1798 =. #271800 
CPSAVE 036502 *56-5900 56-5900 #56-5900 57-5902 57-5902 66-6060 75-6964 


CP<PUR 042120 25-1487 25-155 28-1886 30-2245 30-2282 31-2448 32-2619 35-3212 35-3223 





A. nee 


CKFPAC 


| SYMBOL CROSS REFERENCE 
SYMBOL 


CREATED BY MACRO ON 28=MAR-81 Ai -_, 


VALUE 


REFERENCES 
ze 94 


52-5648 





37-3393 
70-6117 


#52-5724 


CAGE 8 
GUENCE 194 
CREF v01 
39-3616 40-3718 
#69-6095 70-6118 
59-5906 
24-1444 24-1444 
71-6130 71-6131 
71-6144 71-6159 
72-6222 72-6225 
72-6252 72-6254 
72-6289 72-6292 
72-6298 72-6301 
72-6332 © 72=6 334 
72-6344 72-6362 
72-6378 72-6380 
72-6449 72-6450 
72-6452 72-6453 
72-6462 72-6462 
72-6466 72-6467 
73-6509 73-6513 
73-6597 73-6613 
52-5565 52-5587 
52-5700 52-5718 
52-5726 552-5727 
§2-5718 52-5719 
52-5727 52-5728 
52-5598 52-5626 


M15 


40-3721 


33-2954 
71-6132 


73-6550 


41-3858 


33-2954 


72-6470 
73-6573 


52-5615 


1 
52-5683 


41-3861 


72-6471 
73-6575 


52-5637 


0 
52-5722 
52-5712 


42-3970 


7 64 
72-6472 
73-6575 


52-5643 
52-5722 


52-5723 
#525714 


43-4102 


71-6125 


52-5665 
52-5723 


52-5724 


po Oe —_ 


| : 
| N 15 
CKF PAC CREATED BY MACRO ON 28-MAR-81 AT ose PAGE 9 


A 
EQUENCE 195 
SYMBOL CROSS REFERENCE CREF 
SYMBOL VALUE REFERENCES 
DDE 0341 5650 #5 


v01 


RB 341°? 52- 2-5725 

DDERD ——s- 034210 52-5676 #52-5726 

DDISP = 177570 #19=1415 20-1427 241443 

DDONE 006210 28-1852 #28-1894 

DDPO 034410 §2-5567 52-5589 52-5720 52-5721 52-5731 

DP! 034420 52-9551 32-5533 55-5562 52-5582 «52-5718 = 52-5718 += 552-5719 © 52=5719 = $2=5720 
ppP2 034430 55-5560 52-5584 52-5720 52-5721 #52-5733 

DDP3 034440 $5-5604 «59-5634 © 52=5722 «= 52-5723 = 52-5724 = 525725 #525734 
DDPS 034450 55-5543  -$2=5660 «52-5691 52-5726 = 52-5727 © 52-5728 = 52-5729 #52-5735 
DDPS 034460 85-5662 59-5689 «52-5726 «= 52=5727 = 525728 = 52-5709 = #5.2-5 736 
OOPS 034470 $5-5606 52-5632 © 52-5722 © 52-5723 52-5706 © 50-5725 #5.2-5737 
ODP? 034500 $5-5611 «55-5689 5 9=5672 «= 525701 —s- S2=5722 ~©—- 525723 = 52-5724 = 52-5725 #52-5738 
ODPB 034510 58616 4-8-5666 5 9= 5667 52-5696 52-5726 = 52-5727 «= 52-5728 ©=— 52-5729 #52=5739 
DDPS 03.520 59-5538 4952-5718 —52=5719-#52-5740 

DD1 032504 #52-5527 

DD10 032714 #52-5569 52-5572 

DD11 03272 52-5570 #52-5572 . 

DD12 032742 52-5575 #52-5578 

DD13 032776 52-5581 #525585 

DD14 033020 852-5591  52= 

DD15 3¢ 52-5592 —#52-5594 

DD16 52-5597 #525 

DD17 033102 52-5603 #52-5607 

5b18 033124 #525613 52-5623 

DD19 033144 #525618 —_52=5621 

DD2 032540 52-5530 #5 2-55.34 

DD20 033154 52-5619  #52-5621 

DD21 033162 52-5614  #52-5623 

pd22 033174 52-5625 #52-5628 

DD23 033230 52-5631 #5 2-5635 

Dd24 033252 852-5041 52-5651 

OD25 033272 #52-5646 52-5649 

DD26 3302 52-5647 52-5649 

DD27 033310 52-5642  #52-5651 

DD3 2562 #52-5540 52-55 

DD30 033322 52-5653 #52-5656 

0D31 033356 52-5659 #5 2-5663 

DD 32 0334 "52-5669 52-5679 

DD33 033420 #52~5674 52-5677 

DD 34 033430 52-5675 #52 -5677 

DD35 0334 52-5670 #525679 

DD 36 033454 52-5682 #52-5685 

DD37 033510 52-5688 #525692 

DD38 033532 #52-5698 52-570 

DD39 033552 #525703 52-5706 

DD4 032602 #52-5545 52-5548 

DD4O 033562 52-5704  #52=5706 

DD41 033570 52-5699 #525708 

DD42 033696 59-5711 #525713 

5 032612 52-5546 9 #52=5548 

6 932620 59-5541 #52=5550 


ee Cee Ce Ce 


CKF PAC 


32°*8 


BSBSBSIISSSIISSSAASSL2 


ak ek ks kt a a tt ot ot tH 
MNUN — = = Sa S| OFDM Ooo0o0o0°oo 


SBSSss 


Goran 

| 
DF i22 
DF 123 
DF 124 
DF 125 
DF 126 
DF 127 
DF 13 
DF 130 
DF 131 
DF 132 
DF 133 


rnnhonnntnnnn 


nun to 


huh When to 


CREATED BY MACRO ON 28=MAR=81 AT 15:02 
SE QUE 


ae cep REFERENCE 


071550 


071550 


071574 


21-1434 


#52-5556 
#52-5563 


74-6761 
74-6779 


#74-6743 


474-6752 
#74-6753 


PAGE 10 
NCE 196 
CREF 01 
7. -6725 74-6726 
74-6736 
74-6741 
74-6743 74-6744 
74-6762 74-6763 
74-6780 74-6781 
74-6747 74-6748 


16 


74-6727 


74-6745 
74-6765 
74-6782 


74-6749 


74-6728 


74-6750 
74-6769 
74-6783 


74-6752 


74-6729 


74-6751 
74-6770 
74-6785 


74-6753 


74-6737 


74-6754 
74-6773 
74-6786 


74-6756 


74-6738 


74-6755 
74-6774 
74-6787 


74-6758 


—_—_——— SS 


| 











CKFPAC CREATED BY MACRO ON 28=MAR-81 AT 13:02 PAGE 11 
SEQUENCE 197 
SYMBOL CROSS REFERENCE CREF v01 
SYMBOL ALUE REFERENCES 
DF147 = 071550 212-1434 = #74=6754 
DFIS = 070620 21-1434 74-6664 
DF1SO)08=3— =-_—«071550 21-1434 =. #746755 
DF1S1 = 071574 21-1634 = #746756 
DFIS2 = 071550 21-1634 3974-6757 
DFIS3) == 071574 21-1434 #74-6758 
DF 154 071604 21-1434 3974-6759 74-6760 
DFISS) = = 071 21-1434 #74-6760 
DF 156 = 071550 21-1434 #74-6761 
DF1S7 = 071550 21-1434 #74-6762 
DF16 070702 21-1434 #74-6665 
DF160 8 8©—= 0715590 21-1434 74-6763 
DF 161 071610 21-1434 = #746764 74-6766 74-6771 74-6772 74-6775 74-6776 
DF162 = 071550 21-1434 74-6765 
DF163 = 071610 21-1634 = #74 -6 7006 
DF164 = 070610 21-1434 #74-6767 
DF165 = 070610 21-1434 74-6768 
DF 166 = 071550 21-1434 #74-6769 
DF167 = 071550 21-1436 = #746770 
DF17 = 070610 21-1434 #74-6666 
DF 170 = 071610 21-1434 474-6771 
DF171 = 07161C 21-1434 #74-6772 
DF172 = 071550 21-1434 74-6773 
DF173 = 071550 27-1634 = #746774 
DF 174 = 071610 21-1434 &74-$775 
DF175 = 071610 21-1434 #74-6776 
DF176 = 071550 21-1434 874-6777 
DF 177 071634 21-1434 #74-6778 
DF2 070600 21-1634 =. # 74-6653 
DF 20 070711 21-1434 #74-6667 
DF200 = 071550 21-1434 3 9#74-6779 
DF 201 = 071550 21-1434 9#74-6,780 
DF202 = 071550 21-1434 #74-6781 
DF203 = 071550 21-1434 #76-6782 
DF206 = 071550 21-1434 74-6783 
DF205 = 070610 21-1434 74-6784 
DF206 = 071550 21-1634 #74-6785 
DF207 = 071550 21-1434 #74-6786 
070721 21-1434 #74-6668 74-6706 74-6711 
= 071550 21-1434 #74-6787 
071637 21-1434 #74-6788 74-6789 74-6790 
= 071637 21-1434 #74-6789 
= 071637 21-1434 #74-6790 
= 071550 21-1434 3 #74-6791 
070725 21-1434 #74-6669 
070737 21-1434 £74-6670 
070747 21-1434 #74-6671 
070756 21-1434 #74-6672 
071002 21214634 =. # 74-6673 74-6676 
071027 21-1434 3974-6674 74-6677 
070610 21-1634 474-6654 74-0455 74-6666 74-6730 74-6731 74-6739 


74-6784 


74-6767 


74-6768 





CKF PAC 


SYMBOL CROSS REFERENCE 
YMBOL AL JE 


tl 


CREATED SY MACRO ON 28-MAR-81 AT 13:02 
SE QUE 


REFERENCES 
4 #7 


21-143 4-6675 
212-1634 #74-6676 
21-1434 #74-6677 
21-1434 = # 74-6078 
21-1634 = # 74-6679 
21-1434 #74-6680 
21-1434 #74-6681 
21-1634 = #746682 
21-1634 #74-6655 
21-1434 #74-6683 
21-1434 74-6684 
21-1634 474-6685 
21-1434 #74-6686 
21-1434 #74-6687 
21-1434 #74-6688 
21-1434 #74-6689 
21-1434 #74-6690 
21-1434 #74-6656 
21-1434 #74-669"1 
21-1434 #74-6692 
21-1434 474-6693 
21-1434 474-6694 
21-1634 74-6695 
74-6719 74-6723 
21-1434 #74-6696 
21-1434 474-6697 
21-1434 74-6698 
21-1434 374-6657 
21-1434 #74-6699 
21-1434 474-6700 
21-1434 #74-6701 
21-1434 #74-6702 
21-1434 #74--6703 
21-1434 #74-6704 
21-1434 #74-6705 
21-1434 #74-6706 
21-1434 #74-6658 
21-1434 #74-6707 
21-1434 #74-6708 
21-1434 #74-6709 
21-1434 #74-671)9 
21-1434 474-6711 
21-1634 # “4 -6772 
21-1434 474-6713 
21-1434 3974-6714 
21-1634 = #7 3-64.84 
21-16 346 473-6495 
21-1434 #73-6563 
21-1434 #73-6564 
21-1434 473-6505 
21-1434 73-6566 
21-1434 475-6567 


74-6680 


74-6686 


74-6693 


74-6734 


74-6697 
74-6698 


74-6663 


74-6794 


74-6708 
74-6714 


PAGE 12 
NCE 198 
CREF 


v01 


74-6681 


74-6696 
74-6658 


74-6699 
74-6700 


74-6664 


74-6712 
74-6717 


16 


74-6682 

74-6732 

74-6659 74-6660 

74-6701 74-6702 74-6705 74-6710 
74-6713 74-6716 74-6718 74-6720 
74-6721 


74-6715 


74-6722 


pro re a — ee 


E 16 
| CKFPAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 


PAGE 13 
| SEQUENCE 199 
| SYMBOL CROSS REFERENCE CREF 

| SYMBOL VALUE 


v01 
V REFERENCES 
| DH105. =: 06553 31-1434 #73-6568 
| DH106—s= 2 31-1434 73-6569 
DH107 = 066263 31-1434 #73-6570 
DHi1 ~—s =: 065533 31-1434 873-6496 
DH110 = =_:067035 31-1434 #73-6571 
DH111 = 066363 31-1434 #73-6572 
DH112 067233 21-1434 #73-6573 «= 73-6578 
DH113. = 066363 31-1434 #736577 
DH114 = 067233 31-1434  #73-6578 
DH115 067452 31-1634 #73-6579 ~=—s- 73-6583 
DH116 = - 067452 21-1434 #73-6583 
DH117 = 065653 31-1634  #73-6584 
DHI2. = 000000 31-1434  #73-6497 
DH120 067736 31-1434 #73-6585 73-6594 
DH121 = 065533 51-1434 873-6587 
DH122 = 066763 31-1434 #73-6588 
DH123. = 066763 31-1434 #73-6589 
DH124 = 065653 21-1434 #73-6590 
DH125. = 065653 31-1634 #73-6591 
DH126  =_-:065533 21-1434 #73-6592 
DH127 = 067035 31-1434 #73-6593 
DH13.—s= 31-1434 #73-6498 
DH130 = 067736 31-1434 #73-6594 
DH131. = 067035 31-1434  #73-6595 
5H132. = 067035 31-1634 873-6596 
DH133 070026 51-1434 #73-6597 73-6599 -—s 73-6600 = 73-6601 «= - 73-6608 = 73-6609 = 73-6616 
DH134 = 070026 31-1434  #73-6599 
DH135 = 070026 31-1434  #73-6600 
DH136 = =_-070026 21-1434  #73-6601 
DH1 3? 0701 36 51-1634 #73-6602 73-6605 73-6606 73-6607 73-6610 73-6611 73-6615 73-6617 
DH14 = =_: 065533 31-1434 #73-6499 
DHI4O =. =_—« 070136 31-1434  #73-6605 
DH141 = 070136 91-1434 #73-6606 
DH142 = 070136 31-1434 #73-6607 
DH143 = =: 070026 31-1434 #73-6608 
DH144 = 070026 31-1434 873-6609 
DH145 = 070136 31-1434 #73-6610 
DH146 =: 070136 31-1434 #73-6611 
DH147 =: 067035 21-1434 #73-661 
DH15 = 065533 31-1434 #73-6500 
DH150 070326 31-1634 #73-6613 
DH151 = 070136 31-1434 #73-6615 
DH152. = 070026 21-1434 #73-6616 
DH153 = 070136 31-1434 #73-6617 
DH154 070417 21-1434 #73-6618 73-6619 
DH155 = 070417 21-1434 73-6619 
DH156 = =: 067035 31-1434 #73-6620 
DH157 =: 067035 5121434 #73-6621 
DH16 065573 31-1434 #73-6501 
DH160 = 067035 31-1434 #736622 
DH161 = 067035 21214636 #73-6623 
DH162 = 067035 31-1634 73-6624 


, a a Ce —_ = 


F 16 
, CKFPAC CREATED BY MACRO ON 28=MAR-81 AT 5:02 PAGE 14 


SEQUENCE 200 
| SYMBOL: CROSS REFERENCE CREF vO01 
| SYMBOL VALUE REFERENCES 
| DH163 = = 067035 21-1434 873-6625 
| DH164 «= = 065653 21-1434 39 #7 3-662" 
| DH165 = =: 065653 21-1434 #73=66c 
| DH166 == 067035 21-1434 = #7 3-6628 
DH167 = 067035 21-1434 #73-6629 : 
DH17 065653 21-1434 #73-6503 73-6584 * 73=6590 73-6591 73-6626 73-6627 73-6643 
DH170 = =_—« 067035 21-1434 #73-6630 
DH171 == 067035 21-1474 39-73-6631 
“1 DH172 = 067035 21-1434 #73-6632 
DH173 = =_—«:06 7035 21-1434 #73-6632 
DH174 067035 21-1434 #73-6634 
DH175 = 067035 21-1434 #73-6635 
DH176 = =_—« 067035 21-1434 #73-6636 
DH177 070457 21-1434 73-6637 
DH2 065253 21-1434 #73-6486 
DH20 065743 21-1434 73-6505 
DH200 = 067035 21-1434 #73-6638 
DH201 = 067035 21-1434 #73-6639 
DH202 = 067035 21-1434 #73-6640 
DH203 = 067035 21-1434 #73-6641 
DH204 = 067035 21-1434 #73-6642 
DH205 == 065653 21-1434 #73-6643 
DH206 = 067035 21-1434 #73-6644 
DH207 = 067035 21-1434 #73-6645 
DH21 = 065533 21-1434 #73-6507 
DH210 = 067035 21-1434 #73-6646 
DH211 070523 21-1434 73-6647 
DH212 = 065533 21-1434 #73-6648 
DH2135 = 065533 21-1434 #73-6649 
DH214 = 067035 21-1434 #73-6650 
Dr22 066031 21-1434 #73-6508 
DH23 066 21-1434 #73-6509 
DH24 066224 21-1434 #73-6512 
DH25 066363 21-1434 3-73-6514 73-6556 73-6561 73-6566 73-6570 73-6572 73-6577 
DH26 066425 21-1434 #73-6515 73-6517 73-6519 73-6520 73-6549 73-6543 73-6545 73-6557 
73-6562 73-6565 73-6569 
DH27 = 066425 21-1434 #73-6517 
DH3 065 346 21-1434 #73-6488 75-6819 75-6849 
DH30 = 000000 21-1434 #73-6518 
DH31 = 066425 21-1434 #73-6519 
DH32 = 066425 21-1434 #73-6520 
DH33 066513 21-1434 473-6521 73-6523 73-6524 73-6525 3-65 26 73-6527 
DH34 = 066513 21-1434 #73-6523 
DH35 = 066513 21-1434 #73-6524 
DH36 = 066515 21-1434 #73-6525 
DH37 = 066513 21-1434 473-6526 
DHS 065437 21-1434 #73-6490 
DHSO = 066513 21-1434 3-73-6527 
DH41 = 000000 21-1434 #73-6528 
DH42 066616 21-1434 = #736529 73-6577 
DH43 = 066616 21-1434 473-6531 
DHSS = 2121634 3973-6532 





| CKFRAC CREATED BY MACRO ON 2B-MAR-B1 AT 13:02 ao 
| SYMBOL CROSS REFERENCE CREF O01 
| SYMBOL VALUE REFERENCES 
| MGS 066720 21-1434  #73-6533 = 73-6535 
DH46 066737 21-1434 — #73-6534 
DHA? = =: 066720 21-1434  #73-6535 
| DHS 065533 51-1434 73-6492 73-6493 73-6494 73-6495 73-6496 = 73-6499 = 73-6500 = 73-6507 
73-6539 73-6542 7346554 736555. 73-6559 = 73-6560 = 73-6564 = 73-6568 = 73-6587 
| 73-6592 73-6648 + = 73-6649 
DHSO 066763 21-1434  #73-6536 = 73-6538 += 73-6588 = 73-6589 
DHT «= = 066763 21-1434  #73-6538 
DHS2 = (065533 21-1434  #73-6539 
D453 = 066425 21-1434 #73-6540 
DHS4 067035 51-1634 73-6541 73-6544 73-6546 «= 73-6547 = 73-6548 = 73-6553 = 73-6558 = 73-6563 
53-6567 73-6571 73-6593 73-6595 73-6596 = 73-6612 += 73-6620 = 73-6621 = 73-6622 
73-6623 73-6626 73-6625 «= 73-6628 «= 73-6629 = 73-6630 »=— 73-6631 = 73-6632 «= 73-6033 
73-6634 73-6635 73-6656 «= 73-6638 «= 73-6639 = 73-6640 = 73-6641 9 73-6642 «= 73-6644 
73-6645 73-6646 «= 73-6050 
DHSS = =: 065533 21-1434  #73-6542 
DH56 = = 066425 21-1434 73-6543 
DHS? =: 067035 21-1434 73-6544 
DHE = =: 065533 21-1434 73-6493 
DH6O = =: 066425 21-1434  #73-6545 
DH61 = =: 067035 21-1434 473-6546 
DH62 = = (067035 21-1434 73-6547 
DH63 «= =_ 067035 21-1434  #73-6548 
DHOS 067145 21-1434  #73-6551 
DH65 067076 21-1434  #73-6549 
DHO6 «= =: 067035 21-1434  #73-6553 
DH67 =: 065533 21-1434  #73-6554 
DH? ss =: 065533 21-1424 73-6494 
DH70 = =:065573 21-1434 #736555 
DH71 = 066363 21-1434  #73-6556 
DH72 = 06042 21= 1434  #73-6557 
DH78 = =_ 067035 21-1434 #736558 
DH74 = =_: 065533 21-1434  #73-6559 
DH75 =: 065533 21-1434  #73-6560 
DH76 «= =: 066363 21-1434 #73-.°41 
DH7? =: 066425 31-1434  #73-656 
DISPLA 001142 #20-1427 —#24-1443 #261443 56-5900 =: 57-5902 
DISPRE 174 #19-1426 24-1443 
DPATS. 017322 #37-3435 
DSWR  —-=_-:177570 #19-1415 —-20=1427 24-1443 
071646 21-1434 #756794 
= 071766 21-1434  #75-6804 
= 073302 21-1434  #75-6896 
= 073360 21-1434  #75-6897 
= 073360 21-1434  #75-6898 
= 073360 21-1434  #75-6899 
= 073302 21-1434  #75-6900 
= 073360 21-1634  #75-6901 
= 073426 21-1434  #75-6902 
= 073 21-1424 #75-6903 
= 071766 21-1434  #75=6805 
= 073302 21-1434 #756906 





[ 
| CKFPAC 


| SYMBOL CROSS REFERENCE 
| SYMBOL VALUE 
| pT14i 073446 
| DT112 = 073446 
| DT113 = 0734646 
DT114 = 073446 
DT115 = 073446 
DTI76 = =_— 073446 
DT117,—_ = ~«971712 
pT12 072010 
DT120. = 071712 
DT121. = 073172 
DT122. = 072576 
DT123 = =_ 073224 
DT124 73460 
DT125. = 073460 
DT126 0 = 073446 
D112? = 073446 
DT13 072076 
DT13G.— = 071712 
DT131 073544 
DT132.— = 0/3544 
D1133 07 
DT13%4 = 073606 
DT135 = 073606 
D1136 «= =_:0736CS 
D137 073660 
D114 = 071766 
; vt140 = 073660 
' DT141 = 073660 
DT142 = 073660 
DT143 = 073606 
DT144 = 073606 
D1145 = 073660 
D1146 == 073660 
D114? =_ 073606 
DT15 = 071766 
DT150 = 073606 
DT151 = 073660 
DT152. = 073606 
D1153 = _ 073660 
D154 073700 
91155 = 073700 
DT156 = =_:«07 3606 
DT157.—_ =_- 073606 
DT16 072130 
DT160 = 073606 
DT161 = 073606 
DT162 == 073606 
27163 - = 073606 
DT164 == 071712 


CREATED BY MACRO ON 28-MAR=81 AT es 


ab 


21-143 


ee ed a od st = 


#75-6952 
#75-6953 


75-6906 


75-6919 


75-6925 
75-6929 


75-6969 


75-6933 


75-6946 


PAGE 16 
QUENCE 202 
cREF V 


75-6907 


75-6930 


75-6971 


75-6934 


01 


H 16 


75-6908 


75-6931 


75-6972 


75-6935 


75-6999 


75-6936 


75-6973 


75-6938 


75-6910 


75-6937 


75-6977 


75-6939 


75-6920 


75-6940 
75-6955 
75-6965 


75-6942 


756921 


75-6941 
75-6956 
75-6966 


75-6944 


CKFPAC 


| SYMBOL VALUE 
01165 = = 071712 
| DT166 = :073606 
01167 = 073606 
DI17,s = 071712 
DT170 = 073606 
D171 = 073606 
DI172 = 073606 
DT173 = 073606 
D1174 = 073606 
DT175 = - 073606 
DT176 = =: 073606 
DT177 073712 
DT2 071670 
DT20 072150 
DT200 = 073606 
DT201 = 073606 
DT202 = 073606 
DT203 = 073606 
DT204 = 073606 
DT205 = 071712 
DT206 = 073606 
DT207. = 073606 
DT21 072172 

DT210 = 0736 

97211 073722 
DT212 073740 
DT213 = = 073740 

DT214. = 07 
DT22 072204 
DT23 072232 
DT24 072254 
DT25 072300 
D126 072350 
D127 072424 
DT3 071712 
D130 072466 
D131 = =: 072350 
DT32. = 072424 
D133 072520 
D134 072576 
D135 = = (072576 
D386. =:072576 
DI37,— ss =: 072576 
DT4 = 071712 
D140 = =: 072520 
072650 
072702 
= 072702 
972760 
073030 





REFERENCES . 


CREATED BY MACRO ON 28=MAR=87 AT sro | 
SYMBOL CROSS REFERENCE 


21-1634 75-6954 
2121634 39 #756955 
21-1634 = #75 =-6956 
21-1434 375-6815 
2121434 #75-6957 
21-1634 3475-6958 
21-1424 = #75 6959 
21-1424 = #75=6960 
21-1434 #75-6961 
21-1434 3 9#75-6962 
21-1434 =, #756963 
21-1434 875-6964 
21-1434 #75-6796 
21-1434 #75-6816 
21-1434 #75-6965 
21-1434 #75-6966 
21-1434 475-6967 
21-1434 #75-6968 
21-1434 375-6969 
21-1434 #75-6970 
21-1434 475-6971 
21-1434 #75-6972 
21-1434 #75-6818 
21-1434 475-6973 
21-1434 75-6974 
21-1434 #75-6975 
21-1434 #75-6976 
21-1434 #75-6977 
21-1434 #75-6819 
21-1434 #75-6822 
21-1454 475-6824 
21-1434 #75-6827 
21-1434 #75-6829 
21-1434 #75-6832 
21-1434 #75-6797 
75-6970 

21-1434 = 75-6834 
21-1434 #75-6837 
21-1434 #75-6838 
21-1434 #75-6839 
21-1434 #75-6842 
21-1434 #75-6845 
21-1434 #75-6846 
21-1434 #75-6847 
21-1434 #75-6799 
21-1434 #75-6848 
21-1434 #75-6849 
21-1434 #75-6855 
21-1434 #75-6856 
21-1434 #75-6858 
21-1434 #75-6861 


I 16 


PAGE 17 
QUENCE 203 
CREF yO 
75-6886 75-6892 
75-6976 
75-6837 
75-6838 
75-6799 75-6815 75-6911 75-6912 
75-6848 
75-6845 75-6846 75-6847 75-6867 
75-6855 


75-6922 


75-6914 


75-6953 


75-6954 


CKF PAC 


CREATED BY MACRO ON 28-MAR=81 AT saat 
SYMBOL CROSS REFERENCE 
MBOL 


VALUE 


hun 


073302 
073172 


or 


me ee ed ned od od 


28-1856 
28-1876 


#53-5822 


PAGE 18 
QUENCE 204 
CREF 01 
75-6870 75-6875 
75-6915 
75-6876 75-6878 
75-6877 75-6879 
75-6803 75-6804 
75-6884 
75-6889 75-6893 
75-6898 
75-6895 75-6902 
28-1848 28-1854 
#28-1836 
28-1882 28-1892 
28-1884 
29-1934 429-1947 
53-5789 53-5795 
53-5813 53-5814 
453-5809 
53-5813 53-5814 
53-581: 53-5813 
53-5815 53-5815 


75-6913 


75-6880 


75-6805 


75-6894 


3-5813 
3-5815 


53-5815 
53-5814 


53-5816 


75-6881 


75-6812 


75-6897 


53-5816 
53-5814 


53-5816 


75-6885 


75-6813 


75-6899 


53-58 
#53-58 


wio— 
WHY) 


#53-5818 
#53-5819 


#53-5821 


75-6891 


75-6901 


53-5816 


75-6896 


75-6903 


#53-5817 


(ee 


| CKFPAC 

| SYMBOL CRO 

| SYMBOL VALLE 

| EERRO 006272 

| EERRI 006310 
EERR2 006324 
FE) 03453-, 
£E10 034764 
fE*? 034774 
EL Il2 035002 
FEI 035020 
EE2 034570 
£E3 034612 
EES 034632 
FES 034642 
EE6 034650 
£7 03466 
re8 034722 
EES 034744 
EMTVEC = 000030 
—M1 044704 
—EM10 = 045112 
£M100 054014 
—M101 054054 
—Mm102 054206 
—M103 054252 
—EM104 054355 
M105 054416 
—M106 054543 
£M107 054616 
—M11 045233 
—™110 054722 
—M111 054.764 
EM112 = 054764 
—M13 055066 
—M114 = 055066 
EM115 = 054764 
EM116 = 055066 
—M117 055170 
—EM12 = 
£M120 055324 
—M121 055460 
EMi22 055577 
EM123 055676 
EM124 055737 
—M125 056032 
—M126 056122 
—M127 056331 
—mM13 = 
—M130 056544 
—M131 056644 
—M132 056704 
EM133 056744 
£M134 057003 
—M135 057042 


REFERENCES 
29-1917 


#59=1415 


21-1434 
21-1434 


CREATED BY MACRO ON 28=MAR=87 AT sat 
SS REFERENCE 


#72-6376 
#72-6377 


472-6434 


k 16 

PAGE 19 
QUENCE 205 

CREF O01 


# 26-1443 

72-6363 72-6366 
72-6365 72-6367 
72-6436 

72-6437 


72-6438 





CKFPAC 


CREATED BY MACRO ON 28-MAR-81 AT bat 
SYMBGL CROSS REFERENCE 
SYMBOL 


REFERENCES 
4 #7 


21-143 2-6435 
21-1434 472-643 

21-1434 3972-6217 
21-1434 472-6437 
21-1434 472-6438 
21-1434 39 # 72-6439 
21-1434 #72-6440 
21-1434 472-6441 
21-1434 372-6442 
21-1634 #72-6443 
21-1434 3 3=—- 472-6444 
21-1434 #72-6220 
21-1434 472-6445 
21-1434 = #7 2= 6446 
21-1434 72-6447 
21-1434 #72-6448 
21-1434 #72-6449 
21-1434 #72-6450 
21-1434 #72-6451 
21-1434 72-6452 
21-1634 = #7 2-6.223 
21-1434 #72-6453 
21-1434 72-6454 
21-1434 #72-6455 
21-1434 472-6456 
21-1434 #72-6457 
21-1434 #72-6458 
21-1434 #72-6459 
21-1434 #72-6460 
~1-1434 #72-6224 
21-1434 #72-6461 
21-1434 #72-6462 
21-1434 3=# 72-6463 
21-1434 #72-6464 
21-1434 #72-6465 
21-1434 #&72-6466 
21-1454 #72-6467 
21-1434 #72-6468 
21-1454 72-6207 
21-1434 #72-6228 
21-145. #72-6469 
21-1434 #72-64,0 
21-1434 #72-6471 
21-1434 #72-6472 
21-1434 472-6473 
21-1434 = #7 2-6474 
21214634 #72-6475 
21-1434 #72-6476 
21-1434 #72-6232 
21-1434 #72-6478 
21-1434 #72-6479 
21-1434 472-6480 


PAGE 20 
UENCE 206 
CREF O01 
72-6439 
72-6442 
72-6443 
72-6445 72-6446 
72-6448 


L 16 


CKF PAC CREATED BY MACRO ON 28-MAR-81 AT ett «| PAs> 21 


QUENCE 207 
SYMBOL CROSS PEFERENCE CREF Ol 
SYMBOL VALUE REFERENCES 
EM213_ = 045200 21-1434 972-6481 
EM214 065026 21-1434 72-6482 
EM22 046375 31-1434 872-6235 72-6237 72-6238 
EM23 = 046375 21-1434 #72=623? 
EM24 = = 046375 21-1434  #72=6238 
EMz5 046462 21-1434 72-6239 
EM2é 046575 21-1434 872-6261 72-6243 
EM2? = =_-946575 21-1434  #72=6243 
EMS 045005 21-1434 #726208 
EM? 046643 31-1434 72-6244 
EM31 046715 21-1434 872-6246 = 72-6248 
EM32 = (046715 21-1434  #72-6248 
EM33 046763 21-1434 872-6249 
EM34 047024 21-1434  #72-6251 
EM35 047126 21-1434 #72-6253 
EM36 047230 21-1434 — #72=6255 
EM37 047331 21-1434 872-6257 
EMG 045052 21-1434  #72-6209 
EM4O 047432 21-1434  #72-6259 
EMG 1 047603 21-1434 #726261 
EM42 047640 21-1434  #72-6256 
EM43 047761 21-1434  #72=6267 
EMG, 050102 21-1434  #72-6268 72-6269 
EM45 =: 050102 21-1434  #72-6269 
M46 050145 21-1434 #726270 
EMG? 050223 21-1434 #726275 
EMS 045112 21-1434 872-6210 72-6213 «= 72-6479 
EM50 050341 21-1434 #726276 
EMS i 050437 21-1434 #726278 
EM52 050500 21-1434 #72=6298 
EM53 050621 21-1434 #72=6 39 
E 051016 21-1434  #72=02 90 
EM55 051062 21-1434  #72-6291 
EMS6 051203 21-1434  #72=6292 
M57 051400 21-1434 72-6293 
Me 045146 21-1434 #72-6211 72-6480 
EM6O 051444 21-1434 #726296 
EM61 051641 21-1434  #72=6295 
: 051705 21-1434 872-6296 
F Me 052077 21-1434 #726300 
EMO4 052271 21-1434 872-6304 72-6306 
EM65 = (052271 21-1434 #726306 
EM66 052425 21-1434  #72-6307 
EM67 052470 21-1434 72-6329 
EM? 045200 21-1434 72-5212 «= 72-6481 
EM70 052721 21-1434 #726330 
EM71 21-1434 #72-6331 
EM72 053146 21-1434  #72-6332 
EM7® 053222 21-1434 #72=6333 
EM74 053262 21-1434 472-6336 
-£M75 053513 27-1434 #726335 
EM76 053636 21-1434 72-6336 


a 


| 
| 








CKF PAC 
SYMBOL CROSS REFERENCE 
V 


REFERENCES 
1-14 a 


34 72-6337 
57-5902 57-5902 
#19=1415 25-1510 
27-1797 28-1843 
30-2098 30-2102 
30-2207 30-2215 
31-2454 $1-2461 
34-3058 35-3182 
36-33 36-330 
39-3594 39-3604 
4i- 41-3874 
43-4131 43-4141 
45-4430 45-4438 
46-4659 46-4667 
49-4994 49-5002 
50-5239 50-5245 
51-5483 51-5485 
52-5723 52-5724 
53-5814 53-5815 
68-6088 09 
#19-1415 24-1443 
#31-2352 # 32-2529 
#642-3938 43-4059 
25-1526 33-2904 
#66-5978 66-6045 
66-5983 66-5991 
66-6017 66-6024 
66-5975 4 
66-5942  #66-6052 
29-1905 #29-1908 

#29-1911 
29-1910 #29-1912 
#29-1913 29-1936 
30-1969 30-1993 
#30-2259 
#30-2 °°) 
30-2254 #30-2301 
30-1976 30-1985 
30-2243 #30-2503 
#30-2304 
#30-2305 
30-201 30-2032 
#30-2308 
#30-2309 
30-2271 #30-2310 
30-2015 30-2024 
30-2149 30-2164 
30-2180 30-2195 
30-2144 $0-2213 
30-2072 30-2080 
30-2178 30-2193 
30-2268 30-2296 


CREATED BY MACRO ON 23-M4R=-81 AT 13:02 
SE QUE 


PAGE 22 
NCE 208 
CREF v01 
#57-5902 
25-1534 25-1547 
28-186 28-1881 
30-2112 30-2134 
30-2221 30-2240 
31-2469 31-2481 
35-3188 35-3194 
36-331 37-3398 
39-3671 39-3622 
41-3881 41-3893 
43-4151 43-4158 
45-4458 45-4466 
46-4672 47-4748 
49-5008 49-5016 
50-5254 50-5260 
51-5498 52-5716 
52-5725 52-5726 
53-5816 54-5881 
#26=1443 — #24-1443 
*35-3103 = # 35-3133 
56-5900 *56-5900 
57-5902 #66-5930 
66-6000 66-6009 
#66-6042 
#66-6047 
30-2077 30-2078 
30-2082 30-2092 
30-2123 30-2143 
30-2118 30-2128 
30-2280 #30-2312 
#30-2313 
#30-2314 
30- 30-2103 
30-2208 30-2216 
#50-— 326 


N 16 


25-1560 


54-5884 


*25-1473 
* 36-3261 
*56-5900 


66-6033 


30-2087 


30-2227 


#3C -2307 


30-2212 


30-2113 
30-2222 


25-1565 
29-1927 


*25-1487 
* 37-3360 
*56-5900 


#66-6037 


#30-2298 


#30-230¢ 


30-2263 


30-2135 
30-2261 


26-1601 


*28-1827 
* 39-3555 
*70-6117 


#30-2311 


30-2139 
30-2251 


26-1607 
29-1945 


57-5902 


*30-1977 
*40-3659 


30-2147 
30-2259 


30-2162 
30-2278 


eS 
CKFPAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 23 
SEQUENCE, | 209 


SYMBOL CROSS REFERENCE v01 

SYMBOL VALUE REFERENCES 

FECMS 042455 #71-6132 75-6801 

FERRO 006766 30-1998  #30-2074 

FERR1 007024 20-1987  #30-2082 

FERR10 007604 30-2053 30-2065 30-2168 30-2199 #30-2210 

FERR11 007640 30-2004 30-2071 #30-2218 

FERR2 007122 30-1991  #30-2105 

FERR2O 30-1977 #30-2224 

FERR21 007776 30-2232 #30-2253 

FERR2S 010026 30-2016 #30-2261 

FERR26 010144 30-2269 #30-2290 

FERRS 007162 30-2026 #30-2118 

FERRS 007154 30-2030 #30-2115 

FERRS 007260 30-2037 30-2041 30-2045 30-2049 #30-2141 

FERR6 007314 30-2057 #30-2149 

FERR7 007450 30-206 #30-2180 

FER2 007126 #30-2107 30-2116 

FFDATO 035622 54-5844 54-5866 54-5884 54-5886 #54-5889 

F F DONE 035702 54-5877 54-5882 54-5884 54-5886 #54-5895 

FFERO 035512 54-5854 54-5876 #54-5879 

FFER1 035526 54-5872 #54-5884 

FFER2 035564 54-5850  #54-5886 

FFPO 035632 54-5861 54-5884 #54-5890 

FFP1 035642 54-5863 54-5884 #54-5891 

FFP2 035652 54-5839 54-5886 #54-5892 

FFPS 035662 54-5841 54-5886  #54-5893 

FFP4 035672 54-5846 54-5868 54-5884 54-5886 #54-5894 

FF 035320 #54-5835 

FF10 035500 54-5871 #54-5873 

FF11 035510 54-5875 #54-5877 

FF2 035354 54-5838  #54-5842 

FF3 035376 #54-5848 54-585 

FF4 035404 54-584 #54-5851 

FFS 035414 54-5853 #54-5857 

FF6 035450 54-5860 54-5864 

FF? 035472 #54-5870 54-5873 

FPSMS 042411 #71-6131 75-6801 

FPSPUR 042066 Se este 28-1858 29-1938 35-3156 35-3175 44-4316 44-4358 49-4979  #67-6073 

FPVECT = 000244 #19-1410  *25-1468  *25-1484 28-1828 +*29-1906 +*35-3098  *35-3131 9 *44-4208 §9=— *44-4299 
*49-4883 +*51-5318 *70-6116 

F XDATO 010240 30-1970 30-1994 30-2033 30-2075 30-2076 30-2145 #30-2316 

FXDAT1 010242 #30-2317 

FXDAT2 010244 #30-2318 

F XDAT3 010246 #30-2319 

FXDAT4 010250 30-2214  #30-2320 

FXDATS 010252 #30-2321 

F XDAT6 010254 #30-2322 

FXDAT7 010256 #30-2323 

F 006360 #30-1964 30-1964 

F10 006602 30-2007 #30-2020 30-2268 
#30-2021 30-2115 


F11 006604 
F12 006622 30-2025 #30-2028 





-———_—- 


| 


CKF PAC 
SYMBOL CROSS REFERENCE 
; SYMBOL VALUE 
| F13 00665 
F135 0066 
F14 
F15 006674 
F16 006704 
F17 006714 
F2 006416 
F20 006724 
F21 0067 
F22 006744 
F23 006762 
F3 0064 
F4 006440 
FS 006456 
F 006532 
F7 006562 
GADR 015030 
GANDO 5000 
GAND 1 015002 
GAND2 015004 
GAND 3 015006 
GCMP 014216 
GDATOO 015020 
GDATO1 015022 
GDATO2 015024 
GDATO3 015026 
015032 
GERR1 014236 
GFLAG1 014754 
GFLAG2 014756 
GNS akkeneek 
GORO 015010 
GOR1 015012 
GOR2 015014 
GOR3 015016 
GPATOO 014760 
GPATO1 014762 
GPATO2 014764 
GPATO3 014766 
GPAT10 014770 
GPAT11 014772 
GPAT12 014774 
GPAT13 014776 
GRE SET 014170 
GSE TUP 014112 


CREATED BY MACRO ON 28-MAR=81 AT 13:02 


REFERENCES 
30-2036 #3 


20 0-2039 
30-2029 #30-2032 
30-204 #30-2043 
30-2044 #30-2047 
30-204 #30-2051 
30-205 #30-2055 

#30-1973 0-19 
30-205 #30-2059 
206 #30-2063 
- #30-2067 
30-2070 #30-2072 
30-196 #30-198 
#30-1982 30-2105 
30-1986 #30-198 
-2003 30-2006 
#30-2012 30-201 
*33-2873 33-2887 
33-2875 33-2899 
#33-2968 
#33-296 
#33-2970 
33-2811 33-2812 
33-2820 33-2821 
33-2811 33-2812 
33-2820 33-2821 
#33-2976 
#33-2977 
#33-2978 
33-2824 #33-2980 
33-2868  #33-287 
33-2811 *33-2811 
*33-2815 33-2816 
33-2820 *33-2820 
«33-2883 33-2891 
19-1426 19-1426 
64-5916 64-5916 
64-5916 64-5916 
33-2900 33-2928 
#33-2972 
#33-2973 
#33-2974 
33-281 33-2813 
#33-2960 
#33-2961 
#33-2962 
33-2812 33-2814 
#33-2964 
#33-2965 
#33-2966 
33-2811 33-2812 
33-2820 33-2821 
33-2811 33-2812 


30-2231 


*33-2901 
33-2909 


33-2813 


33-2822 


33-2812 


6 
#33- 2971 


33-2815 


PAGE 24 
SEQU ee 210 


33-2951 
33-2925 


33-2814 


33-2850 


* 33-2812 


64-5916 


33-2817 


33-2818 


33-2814 
433-2856 
33-2814 


vo1 


#33-2979 
33-2942 


33-2815 


33-2815 
33-2856 


33-2813 
*33-2817 
33-2822 
55-5898 


64-5916 
64-5916 


33-2819 


33-2820 


33-2815 
33-2815 


#33-2967 


33-2816 


33-2816 
33-2863 


«33-2813 
33-2818 
*33-2822 
64-5916 


64-5916 
64-5916 


33-2821 


33-2822 


33-2816 
33-2816 


33-2817 


33-2817 
33-2885 


33-2814 
*33-2818 
33-2836 


64-5916 
64-5916 
64-5916 


33-2846 


33-2841 


33-2817 


33-2817 


33-2818 


33-2818 


#33-2975 


«33-2814 
33-2819 
#33-2957 
64-5916 


64-5916 
64-5917 


#33-2959 


#33-2963 


33-2818 
33-2818 


33-2819 
33-2819 


33-2815 


* 33-2819 


64-5916 
64-5917 


33-2819 
33-2819 


kane meee meene arn ee ea 
| 


| CKFPAC CREATED BY MACRO ON 28-MAR-81 AT ae - OUENCE a 25 
SYMBOL CROSS REFERENCE v01 
SYMBOL VALUE REFERENCES 

33-2820 3-2821 33=2822 #33-2836 
014322 33-2811 33-2812 33-2813 33-2814 33-2815 33-2816 33-2817 33-2818 33-2819 
33-2820 33-2821 33-2822 #33-2891 
014142 #33-2846 33-286 
104406 24-144 #64-5916 
012020 33-2811 33-2811 #33-2811 33-2811 
12326 33-2813 #33-2813 
012330 33-2813 #33-2813 x 
012422 33-2814 33-281 433-2814 33-2814 
012454 33-2814 #33-2814 
012456 33-2814 #33-2814 
012550 33-2815 33-2815 #33-2815 33-2815 
012602 33-2815 #33-2815 
2604 33-2815 #33-2815 
012052 33-2811 #33-2811 
012676 33-2816 33-2816  #33-2816 33-2816 
012730 33-2816 #33-2816 
012732 33-2816 #33-2816 
013024 33-2817 33-2817 #33-2817 33-2817 
013056 33-2817 #33-2817 
013060 33-2817 #33-2817 
013152 33-2818 33-2818  #33-2818 33-2818 
13204 33-2818  #33-2818 
012054 33-2811 #33-2811 
013206 33-2818  #33-2818 
13300 33-2819 33-2819 #33-2819 33-2819 
013332 33-2819 #33-2819 
013334 33-2819 #33-2819 
13426 33-2820 33-282 #33-2820 33-2820 
013460 33-2820 #33-2820 
013462 33-2820 #33-2820 
013554 33-2821 33-2821 #33-2821 33-2821 
012146 33-2812 33-2812 #33-2812 33-2812 
13 33-2821 #33-2821 
013610 33-2821 #33-2821 
013702 33-2822 33-282 #33-2822 33-2822 
013734 33-2822 #33-2822 
13736 33-2822 #33-2822 
012200 33-2812 #33-2812 
012202 33-2812 #33-2812 
012274 33-2813 33-281 433-2813 33-2813 
15566 * 34-3033 34-3041 #34-306 
015642 34-3025 34-3035 34-3044 434-3071 
015572 34-2991 34-300 34-3010 34-3034 34-3052 #34-3065 
015652 34-3026 #34-3072 
015602 34-3001 34-3011 434-3066 
15662 34-3027 #34-3073 
015612 34-3002 34-3012 34-3067 
015672 34-3028  #34-3074 
015622 34-3003 34-301 #34-3068 
015702 34-3029 #34-3075 





015632 


34-3004 


34-3014 


434-3069 


aaa een eee eee mee 


CKF PAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 26 
SEQUENCE 212 
SYMBOL CROSS REFERENCE CREF O01 
SYMBOL VALUE REFERENCES 
HCLR 015516 34-2997 34-3024 434-3044 
; HCLRI 015526 #34-3046 34-3047 
HCMP 015460 34-3008 34-3010 34-3011 34-3012 34-3013 34-3014 #34-3033 
HCMP 1 015500 #34-3037 34-3040 
HCMP2 015510 34-3038 #34-3040 
HDAT1 015712 34-2992  #34-3077 
HDAT2 0157 #34-3078 
HDAT3 015732 #34-3079 
HDATS 015742 #34-3080 
HDATS 015752 #34-3081 
HDONE 015762 34-3018 34-3059 #34-3082 
HERROR 015534 34-3039 #34-3051 
HF LAG 015570 * 34-2990 34-3016 34-3020 434-3063 
STD 015402 34-3006 34-3010 34-3011 34-3012 34-3013 34-3014 434-3024 
HT = 000011 #19-1415 59-5906 59-5906 
H1 015044 34-2988  #34-2990 
10 015306 #34-3013 34-3013 
H11 015340 #34-3014 34-3014 
H12 015372 34-3017 #34-3020 
H2 015064 #34-2994 34-29 
H3 015074 #34-2999 34-3021 
H4 015146 #34-3006 
H5 015170 #34-3010 34-3010 
H6 015222 #34-3011 34-3011 
47 015254 #34-3012 34-3012 
IBSAVE 036504 #57-5902 = *57-5902 = *57-5902 57-5902 57-5902 57-5902 57-5902 
IDATIO 011122 31-2339 31-2345 31-2363 31-2389 31-2394 31-2423 31-2459 #31-2500 
IDATI1 011124 #31-2501 
IDATI2 011126 *31-2420 #31-2502 
IDATI3 011130 *31-2421  #31-2503 
IDATOO 011112 31-2359 31-2362 31-2417 31-2422 31-2460 431-2495 
IDATO1 011114 #31-2496 
IDATO2 011116 31-2368 31-2373 31-2428 #31-2497 
IDATO3 011120 31-2431 #31-2498 
011132 31-2437 31-2455 31-2462 31-2470 31-2482 #31-2505 
IERRO 010672 31-2352 #31-2440 
IERR1 010754 31-2377 31-2430 #31-2458 
IERR2 010774 31-2381 #31-2465 
IERR25 011016 #31-2468 31-2474 
IERR3 01 31-241 #31-2477 
IERR4 011022 31-2433 31-2471 
ILLMS 043365 #71-6159 75-6824 
ILL1 3261 #71-6156 
ILL2 043324 #71-6158 
IOTVEC = 000020 #19-1415 = *24-1443 = * 24-1443 
IPAT10 011072 31-2340 31-2388 #31-2485 
IPAT?1 011074 #31-2486 
IPAT12 011076 31-2428 #31-2487 
IPAT13 011100 31-2431 #31-2488 
IPAT20 011102 31-2348 31-2397 #31-2490 
IPAT21 011104 431-2491 
IPAT22 011106 #31-2492 





et ee ee ne eet ae ee at ae nt ae te Od ot Be be Bs Oe Be (/) (L/D 


o oes 


Krohn 3a 2S 3 SS SS x x 
atranienae 


WhO N 


MEW 


16 


CREATED BY MACRO ON 28-MAR=81 AT 13:02 


CROSS REFERENCE 
VAL 


0 
017274 
017276 


eet 


437-3423 


#31-2337 


#31-2381 
#31-2388 
2 


0 
#36-3319 
36-3274 
36-3275 


#36-3334 


36-3301 
#36-3290 


37-3369 


31-2478 


36-3282 


36-3315 


36-3308 
#36-3303 


#36-3296 
36-3313 


37-3381 


PAGE 27 
SEQUENCE 213 
CREF 


36-3306 


#36-3329 


36-3317 


437-3422 


v01 


36-3314 436-3324 


#36-3340 


ee 


CKF PAC 


zx 
é 
W 


LPAT23 


CREATED BY MACRO ON 28-MAR-81 AT at 
CROSS REFERENCE 
VALUE 


017624 


REFERENCES 
# 37-3424 


#38-3526 


37-3404 
37-3374 
37-3399 


#37-3432 


#37-3352 
92 


38-3462 
«38-3479 
#38-3530 


38-3482 
#38-3532 


38-3497 


#38-3492 


75-6800 


55-5898 
#38-3518 


38-3506 


37-3412 


37-3413 


37-3406 


#37-3401 


437-3395 
37-3411 


38-3481 
38-3495 
38-3502 


38-3504 


59-5906 
75-6802 
75-6802 


#38-3523 


PAGE 28 
SEQUENCE 214 
CREF 


437-3417 


#37-3427 


37-3415 


38-3501 
#38-3529 
38-3507 


38-3516 


v01 


437-3437 


38-3513 


#38-3531 


#38-3536 


#38-3527 


‘c--e-——— ee SS 


H 1 





| CKFPAC «CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 29 
SEQUENCE 215 
| CROSS REFERENCE CREF Vol 
| VALUE REFERENCES 
| 017336 38-3447 #38-3449 
| 017376 #38-3066 38-3493 «38-3500 ~—«- 38-3512 
017400 #38-3467 
| 017402 #38-346 
017455 #38-3485 38-3488 
017460 38-3286 #38-3488 
020172 35-3570 39-3573 39-3583. «39-3593 «39-3609 39-3635 
090174 #39-3636 
050176 #39-3637 
50200 #39-3638 : 
020202 39-3581 39-3595 39-3605 «39-3612 «39-3623 -#39-3640 
020026 39-3366 -#39-3597 
020064 39-3876 39-3587 #39-3607 
50000 #39-3590 
030112 39-3555 #39-3614 
= 000214 #19-B06. 21-1431 
044067 33-2811 33-2812 -#71-6176 
044075 33-5813 33-9814 K71-6177 
044102 33-5815 33-2816 —-#71-6178 
044107 33-5817 33-9818 + #71-6179 
044116 33-5819 33-2820 #71-6180 
044124 33-5821 -33-9892-«#71-6181 
020152 39-3551  #39-3625 
050154 #39-3626 
030156 #39-3627 
020160 #39-3628 
020162 39-3592 39-3610 #39-3630 
50164 #39-3631 
050166 139-3632 
020170 #39-3638 
043433 #71-6160 75-6827 «75-6840 75-6857 «75-6873 
043607 eoleele? —«-7aeBS0 «75-6831 «78-6833. «75-6843 «75-6844 «75-6853 «75-6854 75-6865 
75-6888 75-6888 75-6917. 75-6918 
043622 #7126168 75-6831 «78-6844 «75-6854 «75-6888 ~—«- 75-6918 
3647 #71-6169 75-6833 «75-6865 
043705 #71-6170 75-6833 «75-6866 
043722 #71-6171 75-6834 
044010 #71-6173 75-6834 
044035 30-22 30-2291 #71-6174 
044042 #71-6178 75-6856 «75-6858 
34.45 ¥71-6161 78-6828 «75-6841 «75-6857 75-6874 
044132 #71-6182 75-685 
044173 #71-6183 78-6857 «75-6857 «75-6859 «75-6860 «75-6873 «= 75-6874 
044232 471-6184 75-685 
044562 #71-6185 75-6860 
044311 #71-6186 75-6858 
044404 471-6188 75-6861 756869 
044426 #71-6189 75-6862 75-6869 
044443 #71-6190 75-6869 75-6869 
345 #71-6162 75-6827 «75-6828 «75-6840 «75-6841 
044459 #71-6191 75-6861 «75-6863 
044461 #71-6192 75-6861 75-6863 





r a eee 


| 
 CKFPAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 30 
SEQUENCE 216 
| SYMBOL CROSS REFERENCE CREF vO01 
| SYMBOL VALUE REFERENCES 
| MS32 044470 #71-6193 75-6862 «75-6864 
ms33 044477 71-6194 75-6862 75-6864 
MS 3e 044506 #716195 75-6862 75-6864 
ms35 044515 31-3354 32-2531 #71-6196 
MS 36 044522 31-5402 39-9573 «#716197 
ms 37 044831 #71-6198 75-6918 «75-6923 
MSG 043501 #7126163 78-6827 «75-6828 «75-6840 75-6841 
msZ0 044547 #71-6199 75-6924 
msc 4603 #71-6201 75-6926 
MSG15 «044563 #71-6200 75-6924 
Msa2 044627 #71-6202 «75-6997 
misc 044645 #71-6208 75-6927 
msod 044662 #71-6204 75-6928 
mss 043518 #71-6166 
Msé 043555 W71ee1es ~—«75=6830 «75-6843 «75-6853 75-6887 75-6917 
mS? 043573 ee emelee 7526830 «76831 «75-6833. «75-6843 «75-6844 75-6853 75-6854 75-6865 
eS-eBR? 4-78-6888 «75-6917 75-6918 
: 017656 #39-3548 
M15 017676 #303557 39-3591 «39-3603 «39-3608 + —«-39- 3620 
m2 017702 #39-3560 39-3597 39-3619 
m3 017704 #39-3561 
ma 017706 #39-3562 
Ms 017742 39-3575  #39-3577 
Me 017746 #39-3578 39-3580 
M? 017756 39-3879 439-3583 
MB 017766 #39-3585  39- 
m9 017776 39- #39-3588 
NDATIO 020700 20-3701 40-3758 «40-3766 ©: #40-3775 
NDATI1. 020702 #40-3776 
NDATI2 70% #40-3777 
NDATIS. 020706 #40-3778 
NDATOO 020636 10-3666 403683. «40-3690 «40-3700 «40-3757 #40~3762 
NDATO! 020640 #40-3763 
NDATO2 020642 940-3764 
NDATOS 020644 #40-3765 
020710 20-3706 «40-3727 «03735 «40-3741 «40-3753 40-3760 —-#40-3780 
NERRO «020400 40-3659 -#40-3714 
NERR1 020500 40-3674  #40-3736 
NERRIO 020432 40-3715  #40-3723 
NERR11 020444 40-3720  #40-3729 
NERR2 020534 40-3678  #40-3742 
NERR20 020506 940-3737 40-3743 40-3745 40-3747 
NERRS 020544 40-3688  #40-3744 
NERRG 020554 40-3696  #40-3746 
NERRS 020564 40-3698  #40-3749 
NERR6 «020610 20-3708  #40-3755 
NOOP1 042473 #71-6134 75-6806 «75-6810 
NOOP1O 042751 471-6162 75-6808 75-6810 
NOOP11 043042 W71~6144 75-6810 
NOOPIS 042522 471-6135 75-6806 
NOOP2 042617 471-6136 75-6806 75-6807 


NOOP 3 042634 #71-6137 75-6807 75-6807 





fe 





CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 31 
SEQUENCE 217 
CROSS REFERENCE CREF = v01 
VALUE REFERENCES 
042646 #71-6138 75-6807 
2663 #71-6139 75-6807 
042711 #71-6140 75-6808 
042731 #71-6141 75-6808 
020670 40-365 #40-3770 
020672 #640-3771 
020674 #40-3772 
020676 #40-3773 
020656 40-3657 40-3669 40-3672 +0-3676 40-3680 40-3691 40-3719 40-3750 #40-3766 
20660 #40-3767 
020662 #40-3768 
20664 #40-3769 
042271 30-222 30-2261 #71-6126 
202 #40-3651 
2034 #40-3693 40-3695 
020350 40-3681 40-3694  #40-3698 
020352 40-3670 #40-3700 
020 #40-3703 40-370 
020376 40-3704 #40-3708 
020232 #40- 40-3739 40-3751 40-3756 
020234 #40-3663 40-3716 
202 ae 40-3714 
020254 #40-3672 
20264 40-3673 #40--3676 
020274 40-3677  #40--3680 
020312 #40-3685 40-3687 
020324 40- #40-3690 
021404 41-3841 41-3899 41-3907 #41-3917 
021406 #41-3918 
021410 #41-3919 
021412 #41-3920 
21342 41-3807 41-3830 41-3840 41-3898 441-3903 
021344 41-3823 #41-3904 
021346 #41-3905 : 
021350 #41-3906 
021414 41-3846 41-3867 41-3875 41-3882 41-3894 41-3901 #41-3922 
021104 41-3799 #41-3854 
021204 41-3815 41-3860 #41-3877 
021136 41-3855  #41-3863 
0211590 #41-3869 
021240 41-3819 #41-3883 
021212 #41-3878 41-3884 41-3886 41-3888 
021250 41-3828 #41-3885 
021260 41-3836 #41-3887 
021270 41-3838  #41-3890 
021314 41-3848  #41-3896 
021374 41-3794 #41-3912 
021376 #41-3913 
021400 #41-3914 
021402 #41-3915 
1360 41-3810 41-3891 #41-3907 
021362 41-3797 41-3813 41-3817 41-3821 41-3831 41-3859 #41-3908 


‘ieee 


| CKFPAC CREATED BY MACRO ON 28-MAR-81 AT 13:02 PAGE 32 
) SEQUENCE 218 
SYMBOL CROSS REFERENCE CREF v01 
VALUE REFERENCES 
1364 #41-3909 
021366 #41-3910 
021370 #41-3911 
020714 #4 1-379 
21064 #41-3833 41-3835 
021054 41-3834  #41-3838 
021056 41-3811 #41-3840 
021072 #41-3843 41-3845 
021102 41-3844  #41-3848 
020740 #61-3803 41-3880 41-3897 
020742 #41-3804 41-3856 
020744 #41-3805 41-3854 41-3892 
020762 #41-3813 
020772 41-3814 41-3817 
21002 41-3818  #41-3821 
021016 #41-3825 41-3827 
021030 41-3826  #41-3830 
022050 42-3940 42-3948 «42-3953 42-3974 = 42-3978 = 42-3982 42-3986 = 42-3990 42-4008 
42-4014 42-4032 
022052 #42-4033 
022054 #42-4034 
022056 #424035 
022060 42-3945 42-3949 42-3958 = 42-4015 #424037 
022062 #42-4038 
22064 #424039 
22066 #42~4040 
022070 42-3956 42-4000 42-4010 42-4017 42-4025 442-4042 
021536 42-3938  #42-3966 
021756 42-3962  #42-4012 
021556 42-3969  #42-3970 
021566 42-3967 —#42-3974 
021604 42-3975  #42-3978 
021622 42-3979  #42-3982 
1640 42-3983  #42-3986 
021656 42-3987 —#42-3990 
21666 42-3991  #42-3993 
021674 42-3973 42-3977 42-3981 42-3985 = 42-3989 #42-3995 
2004 42-3964 42-4019 
021722 42-3992  #42-4002 
021732 42-3955 #42~4005 
021740 42-4004  #42-4006 
2040 66-6056  #66-6060 
042010 66-6056  #66-6058 
041754 66-6056 466-6057 
042050 66-6056  #66-6061 
041744 #66-6056 
= 177772 #19-1415 
= 000240 #19-1415 
042224 65-5920 #71-6125 
022040 42-3935  #42-4027 
022042 #424028 
022044 #42-4029 





CKF PAC CREATED BY MACRO ON 28-MAR-81 AT 13:02 PAGE 33 
SEQUENCE 219 

SYMBOL CROSS REFERENCE CREF vO01 
SY REFERENCES 
PPAT13 022046 442-403 
PROGNU = 01 #19-807 24-1444 
PRO = #19=1415 
PR1 = 0 0 #19-1415 
PR2 = 000100 #19-1415 
PR3 = 000140 #19-1415 
PRS = 000200 #19-1415 
PRS = 000240 #19-1415 
PR6 = 000300 #19-1415 
PR7 - 340 #19-1415 
PS = 177776 #19-1415 19-1415 
PSW = 177776 #19-1415 26-1585 
PWRVEC = 24 #19-1415 —-#24-1443 = *24-1443 — *65-5920 9-65-5920 §9= 65-5920 = *65-5920 9 *65-5920 = *65-5920 
P1 021420 #42-3932 
b2 021442 #42-3942 42-3943 42-4005 42-4013 42-4020 
P3 021444 42-3943 42-3966 43-4101 
P4 021446 #42-3945 42-3968 
PS 021470 #42-3950 42-3952 
P6 021512 42-395 #42-3958 
P7 021522 #42-3960 42-396 
P8 021532 42-3961 #42-3963 
QDATIO 022560 43-4073 43-4156 43-4166 #43-4176 
QDATI1 022562 #43-4177 
QDATI2 022564 #43-4178 
QDATI3 22566 #43-4179 
QDATOO 022550 43-4068 43-4072 43-4083 43-4091 43-4157 #43-4171 
QDATO1 022552 #43-4172 
QDATO2 022554 443-4173 
QDATOS3 022556 #43-4174 

022570 43-4081 43-4132 43-4142 43-4152 43-4159 #43-4181 
QERRO 22236 43-4059  #43-4101 
QERR1 022502 43-409 443-4154 
QERR11 022246 #43-4104 
QERR12 22264 43-4105  #43-4108 
QERR13 022302 43-4109 #43-4112 
QERR14 022320 43-4113 #43-4116 
QERR15 22336 43-4117 #43-4121 
QERR16 022346 43-4122  #43-4125 
QERR17 022354 43-4107 43-4111 43-4115 43-4119 #43-4127 
QERR2 224 43-4088 443-4144 
QERR20 022402 43-4123 43-4134 
QERR21 022412 43-4080  #43-4137 
QERR22 022420 43-4136 #43-4138 
QERR3 022446 43-4097 #43-4146 
QERR4S 022454 43-4145 #435-4148 
QPAT10 022530 43-4056 443-4161 
QPAT11 022532 #43-4162 
QPAT12 022534 443-4163 
QPAT13 022536 #43-4164 
QPAT20 022540 Bl wy 43-4078 43-4090 43-4104 43-4108 43-4112 43-4116 43-4121 43-4140 
QPAT21 022542 #43-4167 





A Cae eat | 


| 
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CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE _34 
SEQUENCE 220 

SYMBOL CROSS REFERENCE CREF Ol 

Y VALUE REFERENCES 

QPAT22 022544 #43-4168 

QPAT23 022546 #43-4169 

a1 022074 #43-4053 

010 022232 43-4094  #43-4096 

a2 022116 #63-4065 43-4066 «43-4137 43-4150 43-4195 

a3 = 022120 #434066 

a4 022122 #43-4068 

a5 022144 #43-4074 43-4076 

06 022166 43-4075  #43-4083 

a7 022176 #43-4085 43-408 

08 02221 43-4086  #43-4090 

a9 022224 #43-4093 43-4096 

RDCHR = 104410 #64-5916 

RESREG = 104412 #64-5916 

RESVEC = 000010 WI9=1415— *24-1443 24-1443 #24-1443 ' 

RSETUP = 104413 35-1567 96-1610 «37-1802 28-1894 29-1947 30-2326 = 31-2505 = 32-2673 ©=— 33-2980 
$2-3082 35-3242 «36-3340 37-3437 «38-3536 «= 39-3640 40-3780 © 41-3922 42-4042 
23-4181 45-4544 46-4694 47-4790 48-4869 «= 49-5044 = 50-5301 51-5463 = 51-5468 
§1-5517 2-741 53-5823 464-5917 67-6080 68-6089 69-6098 

R6 =%000006 #I9=1415— *24-1443 © *24-1443 24-1443 

R7 =%000007 #19-1415 

SADR 016502 #35-3158 35-3171 *35-3176 «=—-35-3183 © 35-3189 #35-3230 

SAVREG = 104411 #64-5916 

COPE = W19-1415. 25-1464 26-1575 27-1620 28-1824 29-1904 = 30-1962 31-2334 = 32-2513 

33-2809 34-2987 35-3092 «36-3250 «37-3349 38-3446 = 39-3546 «= 40-3649 = 41-3789 
73-3930 43-4051 44-4199 45-4411 46-4553. 47-4703 = 48-4799 = 49-4879 = 50-5055 
51-5313 52-5525 53-5749 54-5833 55-5898 

SDATOO 016516 35-3111 35-3114 = 35-3141 35-3144 435-3237 

SDATO! 016520 #35-3238 

SDATO2 016522 #35-3239 

SDATOS 016524 #35-3240 

S 016526 35-3176 35-3195 35-3198 = 35-3202. 35-3205 = 35-3217 35-3228 = #35-3242 

SERRO  —- 016206 35-3098 #35-3154 

SERR1 016416 35-3103 #35-3208 

SERRI0 016226 #35-3160 35-3177 

SERR15 016306 35-3165  #35-3180 

SERR2 016346 35-3119 35-3193 

SERR20 016326 35-3170 #35-3186 

SERR3. «018372 35-3122 #35-3200 

SERRG 016264 35-3131 #35-3173 

SERRS «016450 35-3133 — #35-3219 

SERR6 «016360 35-3149 #35-3196 

SERR7 16404 35-3151 #35-320 

SETD1 043237 27-1653 27-1751 #71-6153 

SETF1 043231 37-1624 27-1775 = #71-6152 

SETI1 043245 27-1681 27-1781 «= -#71-6154 

SETL1 043253 37-1710 27-1757 -#71-6155 

SPACE 042274 ~6065  #71-6128 

SPATIO 0165 35-3095 35-3115. «35-3128 «= 35-3145 #35~3232 

SPAT11 016510 #35-323 

SPAT12 016512 #35~-3234 

SPAT13. 016514 #35-3235 


CKF PAC CREATED BY MACRO ON 28-MAR-81 AT 13:02 PAGE 35 
oman ak 


SYMBOL CROSS REFERENCE v01 

SYMBOL VALUE REFERENCES 

STACK = 001100 #19-1415 24-1443 70-6120 

START 003616 19-1426 = 24-1443 65-5920 

STFS1 043162 #71-6148 

STKLMT = 177774 #19-1415 

STST1 3312 #71-6157 

ST] 043175 #71-6149 

ST2 043212 #71-6150 

SwR 001140 #20-1427 24-1443 = * 24-1443 246-1443 24-1443 * 24-1443 24-1444 25-1516 25-1518 


33-2893 33-2895 55-5898 56-5900 56-5900 56-5900 56-5900 56-5900 57-5902 
57-5902 57-5902 57-5902 57-5902 63-5914 63-5914 65-5920 65-5920 70-6109 


SWREG 000176 #19-1626 24-1443 24-1444 63-5914 63-5914 

SwO = 000001 #19=1415 

S = 000001 #19-1415 19-1415 

Sw01 = 000002 #19-1415 19-1415 

Sw02 = 000004 #19=1415 19-1415 

Sw03 = 000010 #19=1415 19-1415 

Sw04 = 000020 #19-1415 19-1415 

SwO5 = 000040 #19-1415 19-1415 

Sw06 = 000100 #19-1415 19-1415 

SwO7 = 000200 #19-1415 19-1415 

SwO8 = 000400 #19-1415 19-1415 

sw09 = 001006 #19-1415 19-1415 

Sw = 000002 #19-1415 

Sw10 = 002000 #19-1415 

Sw11 = 004000 #19-1415 

SwW12 = 010000 #19-1415 

Sw13 = 020000 #19-1415 25-1516 33-2893 

SwWw14 = 040000 #19-1415 

SwW15 = 100000 #19-1415 

Sw2 = 000004 #19-14615 

Sw3 = 000010 #19-1415 

Sw = 000020 #19-1415 

Sw5 = 0 #19-1415 

SwW6 = 000100 #19-1415 

Sw7 = 000200 #19-1415 25-1518 33-2895 

Sw8 = 00 #19-1415 

Sw9 = 001000 #19-1415 

$1 015766 #35-3093 

$10 016144 #35-3139 

$11 016170 #35-3147 35-3150 

Si2 016200 35-3148 #35-3150 

S2 016026 #35-3106 35-3193 35-3200 

$3 016030 #35-3107 35-3154 35-3208 

S4 016034 #35-3109 35-3210 

s5 16060 #35-3117 35-312 

S6 016070 35-3118 #35-3120 

S7 016076 #35-3125 35-3158 

s8 6136 #35-3136 35-3196 35-3203 35-3219 

S9 016140 435-3337 35-3173 35-3221 

TAB = #19-1413 71-6127 71-6129 71-6130 71-6134 71-6140 71-6141 71-6142 71-6142 
71-6142 71-6145 71-6145 71-6146 71-6146 71-6146 71-6147 71-6147 71-6148 
71-6148 71-6149 71-6149 71-6150 71-6150 71-6151 71-6152 71-6153 71-6154 


— 





CKF PAC CREATED BY MACRO ON 28-MAR-81 AT 13:02 PAGE 36 
SEQUENCE 222 
SYMBOL CROSS REFERENCE CREF 01 
SYMBOL VALUE REFERENCES 
71-6155 . 71-6156 71-6157 71-6157 71-6158 71-6159 71-6159 71-6159 71-6171 
71-6171 71-6171 71-6172 71-6182 71-6182 71-6186 71-6186 71-6186 73-6484 
73-6484 73-6485 73-6485 73-6485 73-6486 73-6486 73-6487 73-6488 73-64 
os 73-6489 73-6489 73-6490 73-6490 73-6491 73-6491 73-6492 73-6492 73-6501 
* 73-6501 73-6502 73-6503 73-6503 73-6504 73-6504 73-6505 73-6505 73-6506 
73-6506 73-6510 73-6510 73-6511 73-6511 73-6514 73-6514 73-6514 73-6515 
73-6515 73-6516 73-6516 73-6521 73-6521 73-6522 73-6529 73-6529 3-6530 
73-6534 73-6536 73-6536 73-6537 73-6541 73-6541 73-6551 73-6551 73-6552 
73-6552 73-6576 73-6576 73-6582 73-6582 73-6585 73-6585 73-6586 73-6586 
73-6598 73-6598 73-6603 73-6603 73-6604 73-6604 73-6614 73-6614 73-6618 
73-661 73-6647 73-6647 73-6647 
TBITVE = 000014 #19=1415  — *#24-1443 — *24-1443 
TDATIO 011740 32-2517 32-2522 32-2540 32-2560 32-2565 32-2594 32-2630 #32-2668 
TDATI1 011742 #32-2669 : 
TDATi2 011744 *32=2591  #32-2670 
TDATI3 011746 *32-2592 #32-2671 
TDATOO 011730 32-2536 32-2539 32-2588 32-2593 32-2631 #32-2663 
TDATO1 011732 #32-2664 
TDATO2 611734 32-2545 32-2599 #32-2665 
TDATO3 011736 32-2602  #32-2666 
T 011750 32-2607 32-262 32-2633 32-2640 32-2651 #32-2673 
TERRO 011516 32-2529 #32-2611 
TERR1 011600 32-2549 32-260 #32-2629 
TERR2 011629 32-2551 #32-2636 
TERR25 011634 #32-2638 32-2643 
TERR3S 011664 32-258 #32-2646 
TERR4 011646 32-2604 #32-2641 
TKVEC = 0 #19-1415 
TOC TNM 042054 66-598 66-5990 66-5998 66-6031 66-6063 
TPAT10 011710 32-251 32-2559  #32-2653 
TPAT11 011712 #32-2654 
TPAT12 011714 32-2599  #32-2655 
TPAT13 011716 32-2602 #32-2656 
TPAT20 011720 32-2525 32-2568 #32-2658 
TPAT21 011722 #32-2659 
TPATe 011724 #32-2660 
TPAT23 011726 #32-2661 
TPVEC = 000064 #19-1415 
TRAPVE = 000034 #19=1415 24-1443 *24-1443 
TRTIVEC = 000014 #19-1415 
TST1 004300 #25-1464 
TST10 011134 #32-2513 
TST11 011752 #33-2809 
TST12 015034 #34-2987 
TST13 015764 #35-3092 
TST14 016530 #36-3250 
TST15 017030 #37-3349 
TST16 017326 #38-3446 
TST17 017654 439-3546 
TST2 672 #26-1575 
TST20 020204 #40-3649 
TST21 020712 #41-3789 


| 















CKF PAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 37 
SEQUENCE 223 

SYMBOL CROSS REFERENCE CREF O01 

SYMBOL VALUE REFERENCES 

TST22 021416 #42-3930 

TST23 022072 #43-4051 

TST24 022572 44-4199 

TST25 023732 #45~4411 

TST26 024530 #46-4553 

TST27 025344 47-4703 

TST3 5 #27-1620 

TST30 025754 #48-4799 

TST31 026262 #49-4879 

TST32 027330 #50-5055 

TST33 031146 #51-5313 

TST34 032502 #52-5525 

TST35 03453 #53-5749 

TST36 035316 #54-5833 

TST37 035702 #54-5896 

TST4 005744 #28-1824 

TSTS 006212 #29-1904 

TST6 006356 #30-1962 

TST7 010262 #31-2334 

TYPDS = 104405 55-5898 55-5898  #64-5916 

TYPE = 104401 24-1444 33-2913 33-2920 33-2936 33-2946 33-2947 55-5898 55-5898 55-5898 
57-5902 57-5902 59-5906 60-5908 61-5910 63-5914 63-5914 63-5914 63-5914 
63-5914 63-5914 64-5916 65-5920 66-5930 66-5958 66-5960 66-5965 66-5967 
66-6015 66-6022 66-6037 66-6047 66-6065 

TYPOC = 104402 63-5914  #64-5916 66-5941 66-5982 66-6064 

TYPON = 104404 #64-5916 

TYPOS = 104403 #64-5916 66-6006 

T1 011136 #32-2514 

T10 011304 32-2548  #32-2550 

T105 011312 32-254 #32-2553 

T11 011314 #32-2557 

T12 011322 32-2557  #32-2559 

T13 011336 #32-2562 32-2563 

714 011400 32-25 #32-2575 

T15 011402 #32-2576 32-261 32-2647 

T16 011404 #32-2577 32-261 

117 011422 32-258 #32-2585 

T2 011162 #32-2519 32-252 

T20 011462 #32-2596 32-2606 

T21 011476 #32-2601 32-260 

T22 011500 32-2600 #32-2602 

123 011512 32-2597 #32-2606 

13 011230 32-2530 #32-2532 

14 011232 #32-2533 32-2611 

T5 011234 #32-2534 32-2613 

16 071260 #32-2542 32-2553 

17 011274 #32-2547 32-2550 

023732 44-4311 44-4320 44-4338 44-4353 44-4364 44-4369  #44-4401 

UERRO 023376 44-4208 444-4314 

UERR1 023422 44-4228 44-4285 = #44-4324 

UERR10 023430 444-4326 44-4340 

023472 444-4335 


| CKFPAC 
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CREATED BY MACRO ON SEQUENCE 224 


CROSS REFERENCE 
VALUE 


024526 


REFERENCE 


45-4544 


S 


44-4267 
#44~-4 341 


#44-4356 


44-4212 
#44-4375 
444-4380 
444-4385 

44-4304 


*44-4236 


44-4262 
#44-4268 


45-4439 


444-4339 


*44-4293 
44-4234 


444-4390 


#44-4255 


44-4255 


44-4365 


45-4459 


38 
01 


#44-4395 
44-4253 


#44-4273 


#44-4295 


45-4467 


44-4271 


44-4341 


444-4397 


45-4487 


44-4289 44-4302 #44-4370 
#44-4398 
444-4399 
444-4400 
45-4495 45-4517 45-4520 


45-4525 
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SEQUENCE 225 
CROSS REFERENCE CREF v01 
VALUE REFERENCES 
024506 45-4415 5-4418 45-4422 45-4424 
45-4474 45-4478 45-4480 45-4499 
45-4531 45-4532  #45-4534 
024510 #45-453 
024512 #45-4536 
024514 45-453 
024454 45-4429 45-4485 45-4515  #45-4529 
023734 #45-441 
024156 45-4457  #45-4460 
024204 45-4462  #45-4468 
024240 45-4473 = #454475 
024264 #45-4482 45-4488 
4300 45-4483 845-4488 
024326 45-4490  #45-4496 
24 45-4501 #45-4505 
024412 445-4512 45-4518 
023770 45-4417 = #45-4419 
024426 45-4513 45-4518 
024014 445-4426 45-4432 
024032 45-442 445-4432 
024062 45-4434  #45-4440 
024122 45-4445 845-4449 
024146 445-4456 45-4460 
025324 #46-4686 
025302 46-4565 46-4588 46-4611 46-4634 
025304 #46-4676 
25306 446-4677 
025310 #46-4678 
025342 46-4646 46-4654 46-4660 46-4668 
025166 46-4571 46-4594  #46-4650 
025250 46-4576 46-4599  #46-4664 
025214 46-4617 46-4640 46-4655 
25264 46-4622 46-4645 #46-4669 
025312 46-4557 46-4567 46-4603 46-4613 
025314 #46-4681 
025316 446-4682 
025320 #46-4683 
025322 46-4561 46-4584 46-4607 46-4630 
025326 #46-4687 
025330 #46-4688 
025332 46-4580 46-4590 46-4626 46-4636 
5334 446-4690 
025336 #46-4691 
25340 #46-4692 
025300 46-4558 46-4581 +*46-4604 *46-4627 
024532 #46-4554 
24734 46-4593  #46-4595 
024750 46-4598  #46-4600 
025010 46-4606  #46-4608 
025034 446-4615 46-4618 
025042 46-4616 46-4618 
025056 46-4621 46-4623 


2 


45-4443 
45-4504 


46-4652 


46-4673 


#46-4680 


46-4650 


446-4689 


46-4651 


45-4448 
45-4508 


46-4657 


446-4694 


46-4655 


46-4656 


45-4452 45-4454 
45-4510 45-4529 
#46-4675 
#46-4685 

46-4658  #46-4674 


45-4471 
45-4530 


CKFPAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 40 
SEQUENCE 226 

SYMBOL CROSS REFERENCE CREF V 

SYMBOL VALUE REFERENCES 

x16 025116 46-4629 #464631 

x17 025142 #46-4638 46-4641 

K2 024572 46-4560  #46-4562 

X20 025150 46-4639  #46-4641 

X21 025164 46-4644  #46-4646 

x3 024616 #46-4569 46-4572 

x4 024624 46-4570  #46-4572 

x5 024642 46-4575  #46-4577 

x6 024702 46-4583  #46-4585 

x? 024726 #46-4592 46-4595 

YDATOO 025712 47-6717 47-4737 47-4746 474754 

YDATO1 025714 #47-4771 

YDATO2 025716 #47-4772 

YDATO3 025720 #47-4773 

Y 025752 47-4734 47-4749 47-4757 47-4763 

YERRI 025552 47-4739 #47-4742 

YERR2 025614 47-4741  #47-4750 

YERR3 025656 47-4726  #47-4758 

YFLAG 025702 #67=4704 47-4727 *47=4729 47-4765 

YPATOO 025722 47-4705 47-4731 #47-4775 

YPATO1 025724 #47-4776 

YPATO2 025726 #47-4777 

YPATO3 025730 #47-4778 

YPATI0 025732 47-4706 47-4730  #47-4780 

YPAT11 025734 #47-4781 

YPAT12 025736 #47-4782 

YPAT13. 025740 #47-4783 

YPAT20 025742 47-4711 47-4765 47-4753 #47-4785 

YPAT21 025744 #47-4786 

YPAT22 025746 #47-4787 

YPAT23 025750 #47~4788 

YTMP1 025704 #47-4705 47-4713 *47-4730 © 47-4736 

YTMP2 025706 47-4706 4 7=4720 47-4731 47-4747 

YTMP3 —- 025710 47-4707 47-4724 *47-4732 47-4761 

v1 025374 #47-47208 47-4733 

v2 025422 #47-4714 47-4743 47-4751 47-4759 

v3 025446 #47-4721 47-4723 

v4 25464 47-4725  #47-4727 

¥5 025524 47-4728 — #47~4734 

Yn 025526 47-4722  #47-4735 

Y? 025542 #47-4738 = 47-4740 

ZDATOO 026220 48-4812 48-4834 448-4849 

2DATC1 026222 #48-4850 

ZDATO2 026224 #48-4851 

ZDAT03 026226 #48-4852 

2D 026260 48-4829 48-4837 48-4843 #48-4869 

ZERR1 026124 48-4818  #48-4830 

ZERR2 026166 48-4822  #48-4838 

ZFLAG 026212 48-4800 48-4823 *48-4825  #48-4845 

2PATOO 026230 48-4801 #484854 

ZPATO! 026232 #48-4855 

ZPATO2 026234 #48-4856 


01 


#47-4770 


#47-4790 


47-4744 
47-4755 


#47-4768 


47-4752 
447-4767 


#47-4766 






G 2 
CKF PAC 





$CM2 


$CM3 
$CM4 


CROSS REFERENCE 
VALUE 


CREATED BY MACRO ON 28-MAR-81 AT i PAG 


000050 


000024 
000024 


REFERENCES 


#20-1427 


#48-4859 
48-4833 


48-4808 


2 
#62-5912 


#62-5912 
#62-5912 
*24-1444 


57-5902 


20-1427 


E 41 
SEQUENCE 227 
CREF 


448-4864 


48-4815 
*48-4827 


48-4839 


63-5914 


57-5902 
59-5906 
64-5916 
24-1443 


20-1427 


v01 


*48-4826 
48-4841 


63-5914 


57-5902 


*59-5906 


24-1443 


#20-1427 


#20-1427 
#20-1427 
#20-1427 


48-4832 
448-4847 


63-5914 


#59-5906 


24-1443 


20-1427 


20-1427 
20-1427 
20-1427 


48-4835 


24-1443 
7 


20-1427 


20-1427 
20-1427 
20-1427 


#48-4846 


24-1443 


#20-1427 


#20-1427 
#20-1427 
#20-1427 


24-1443 


20-1427 
20-1427 


20-1427 


20-1427 
20-1427 
20-1427 


20-1427 


20-1427 
20-1427 


20-1427 
20-1427 
20-1427 


CKFPAC 


SYMBOL C 
SYMBOL 


SCNTLG 
SCNTLU 
$CPUOP 
SCRLF 


CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 42 
a . 


ROSS REFERENCE 
VALUE 


041043 
041036 
001344 
001313 


REFEREN 


#21-1427 





CES 


20-1427 
20-1427 
20-1427 
20-1427 
#63-5914 
#63-5914 


33-2947 


7 
61-5910 


55-5898 
#61-5910 
24-1444 
#55-5898 


24-1444 


66-5954 


#61-5910 


55-5898 
#55-5898 


57-5902 


*56-5900 
56-5900 


*33-2902 
66-5940 


#20-1427 
#20-1427 
#20-1427 
#20-1427 


57-5902 


75-6927 


#55-5898 
57-5902 


906 
69-6099 
56-5900 

*56-5900 


*57-5902 
66-6060 


01 


75-6927 


62-5912 
62-5912 
56-5900 
56-5900 
*57-5902 


20-1427 


20-1427 


57-5902 


75-6928 


62-5912 


*56-5900 
56-5900 
57-5902 


#20-1427 
#20-1427 
#20-1427 
#20-1427 


59-5906 


75-6928 


56-5900 


57-5902 


20-1427 
20-1427 
20-1427 


75-6924 


56-5900 


*57-5902 


20-1427 
20-1427 
20-1427 


75-6918 
75-6926 


*57-5902 


57-5902 








2 


CKFPAC CREATED BY MACRO ON 28-MAR=81 AT 13:02 PAGE 43 
SEQUENCE 229 
SYMBOL CROSS REFERENCE CREF v01 
SYMBOL VALUE REFERENCES 
SERTTL 001112 #20-1427 55-5898  *55-5898  *57-5902 57-5902 57-5902 
SESCAP 1304 #20-1427 = 24-1443 = *56-5900 57-5902 57-5902 57-5902 57-5902 
SE TABL 001336 #20-1427 
SE TEND 001442 #20-1427 23-1440 
SFATAL 001320 #20-1427 = 62-5912 = *66-5949 
SFFLG 040422 *62-5912  *62-5912 62-5912  *62-5912 462-5912 
SFILLC 001156 #20-1427 59-5906 59-5906 59-5906 
SFILLS 001155 #20-1427 59-5906 59-5906 
SGDADR 001120 #20-1427 
SGDDAT 001124 #20-1427 
$GET42 036062 #55-5898 
$GTSWR 040474 #63-5914 64-5916 64-5916 
= 000003 19-1409 19-1409 19-1409 
$SHIBTS 003602 #23-1440 
SICNT 001104 #20-1427 *56-5900 56-5900 *56-5900 56-5900 56-5900 
SILLUP 1334 65-5920 65-5920 #65-5920 
SINTAG 001135 #20-1427 63-5914 63-5914 63-5914 
SITEMB 001114 #20-1427 = *25-1525 = *33-2903 = *57-5902 57-5902 57-5902 57-5902 57-5902 66-5936 
F 001314 #20-1427 57-5902 57-5902 59-5906 59-5906 
SLFLG 040421 *62-5912 #62-5912 
ooP 036156 55-5898 #55-5898 
$LPADR 0011 #20-1427 = 24-144 *56-5900  *56-5900 56-5900 56-5900 56-5 
SLPERR 001110 #20-1427 —#24-146463 —*25-1466 = *26-1576 = *27-1621 = #271638 = *27-1651 = *27-1666 = *27- 1679 
#27=1695 *27-1708 + *27-1723 = *28-1825 = *29-1905 — *30-1964 += * 30-2 *31-2335 *31-2387 
#32-2514  *32-2557 33-2811) #33-2812 «= * 33-2813 = * 33-2814 9=— * 33-2815 = * 33-2816 = * 33-2817 
#33-2818 33-2819 33-2820 33-2821 *33-2822 +*34-2988  +*35-309 *35-3125 *36-325 
#37=3350 —& 38=3447 9 #44-4209 = 844-4230 944-4250 9844-4268 9844-4297 = 845-4412 = #454440 
#45-4468 45-4496 46-4554 #46-4577 = 46-4600 §=— #464623 = #47-4708 3=— #484805 #494 
#49-4909  *49-4943 50-5057 *50-5085 = *50-5113 = *50-5142 = *50-5171 = *50-5199)— #51-5315 
#51-5339 -#51-5367 51-5390 = *51-5419 = #51-5440 39 *52-5527 = * 52-5556 9=— #525578 = #525600 
"Se -gece "te 2028 ys ws *53-5751 *53-5780 54-5835 *54-5857 56-5900 *56-5900 
SMADR1 001350 #20-1427 
SMADR2 001354 #20-1427 
$SMADR3 001360 #20-1427 
SMADRS 001364 #20-1427 
SMAIL 001316 #20-1427 23-1440 23-1440 24-1443 24-1444 56-5900 57-5902 59-5906 
SMAMS 1 1346 #20-1427 
SMAMS2 001352 #20-1427 
SMAMS 5 001356 #20-1427 
SMAMSS 001362 20-14 
SMBADR 00 #23-1440 
SMFLG 040420 *62-591 62-5912 *62-5912 #62-5912 
SMNEW 041061 63-5914  #65-5914 
SMSGAD 001332 #20-1427 = =*62-5912 62-5912 
SMSGLG 001334 #20-14 *62-5912 
SMSGTY 001316 #20-1427 62-5912 62-5912 62-5912 *62-5912 
041050 63-5914 #63-5914 
SMTYP1 001347 #20-1427 
SMTYP2 001353 #20-1427 
001357 #20-1427 
001363 #20-1427 





PAGE 44 


CKF PAC CREATED BY MACRO ON 28-MAR-81 AT 13:02 
SE ony es . 


SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
SMXCNT 


01 
REFERENCES 


036500 56-5 -5900 56-5900 #56-5900 
SNULL 001154 #20-1427 5 59-5906 9-5 
SNwTST = 000001 #24-1464 24-1464 #25-1464 25-1464 925-1575 25-1575 #26-1575 26-1575  #26-1620 
26-162 #27-1620 27-1620 427-1824 7=1824 #28-1824 28-182 #28-1904 28-1904 
1904 1 #29-196 196 #30-1962 30-1962 #30-2354 30-2334 31-2334 
31-2334 #31-2513 31-251 #32-251 32-2513 #32-2809 2-2809 #33-2809 2809 
#33-2987 2987 #34-2987 -29 #34-309 34-3092 #35-3092 35-3092 #35-3250 
35-3250 #56-3250 36-325 #36-3349 36-3349 #37-3349 37-3349 #37-3446 — 3446 
#38-3446 38-3446 #38-3546 38-3546 #39-3546 39-3546 #39-3649 39-3649 #40-3649 
0-3649 #40-3789 40-37 #41-3789 41-378 #41-3930 41-3930  #42-3930 42-3930 
#42-4051 42-4051 #643-4051 43-4051 443-4199 43-4199 #44-4199 44-41 444-4411 
44-4411 #65-4411 45-4411 #45-4553 45-4553 #66-4553 46-4553  #46-4703 46-4703 
#47-4703 47-4703 #47-4799 47-4 #48-4799 48-47 448-4879 48-4879 49-4879 
9=-4879  #49-5055 49-5055  #50-5055 50-5055 #50-5313 50-5313 51-5313 51-5313 
#51-5525 51-5525 #52-5525 §2-5525 #52-5749 52-5749 #53-5749 53-5749 #53-5833 
53-5833 #54-5835 54-5833 
SOCNT 037726 *60-5908 60-5908 #60-5908 
037730 *60-5908 *60-5 5908  +*60-5908 *60-5908 #60-5908 
SOVER 64 56-5900 56-5900 56-5900 56-5900 #56-5900 
SPASS 001324 a vanes 4 224-1443 55-5898 55-5898 55-5898 55-5898 55-5898 56-5900 56-5900 
SPASTM 3616 #23-1440 
$SPWRAD 041316 #65-5920 
SPWRDN 041156 24-1443  #65-5920 65-5920 
SPwWRMG 041312 #65-5920 
SPWRUP 0412 65-5920 #65-5920 
SQUES 0071312 #20-1427 57-5902 57-5902 59-5906 59-5906 63-5914 
SRDCHR 04 463-5914 64-5916 64-5916 
SRDDEC = *etee8 64-5916 
SRDLIN = **ee88 64-5916 
SRDOCT = #0828 64-5916 
SRDSZ = 1 #63-5914 63-5914 
SRE GAD 001160 #20-1427 
$SREGO 001162 #20-1427 = 57-5902 = * 57-5902 57-5902 
SREG1 001164 #20-1427 
$REG10O 001202 #20-1427 
$SREG11 001204 #20-1427 
SREG1 001206 #20-1427 
SREG1 001210 #20-1427 
SREG14 001212 #20-1427 
$REG15 001214 #20-1427 
SREGI6 001216 #20-1427 
SREG17 001220 #20-1427 
SREG2 001166 #20-1427 
$SREG20 001222 #20-1427 
$REG21 001224 #20-1427 
$REG2. 001226 #20-1427 
SREG2 001230 #20-1427 
SREG3 001170 #20-1427 
SRE GS 001172 #20-1427 
SREGS 001174 #20-1427 
SRE G6 001176 #20-1427 


































CKF PAC CREATED BY MACRO ON 28-MAR=81 AT 13: oS queen nce est 
SYMBOL CROSS REFERENCE CRE v01 
SYMBOL VALUE +N a 
$SREG7 0012 #20-1427 
SRESRE 037102 #58-5904 64-5916 
$RTNAD 0361 #55-5898 
SRTRN 036154 24-1463 —#24-1443 -#24-1443 55-5898 #55-5898 
$SR2A = seteee 64-5916 
SSAVRE 037044 #58-5 64-5916 64-5916 
SSAVR6 041340 *65-5920 65-5920 65-5920 *65-5920 #65-5920 
SSCOPE 036170 24-144 #56-5900 
$SETUP = 000137 #19=1425 19-1625 = #19=1425 19-1425 9419-1425 19-1425 = #19-1425 19-1425 = -#19=1425 
19-1425 = #19-1425 19-1425 #19-1425 24-1443 24-1443 24-1443 24-1443 24-1443 
24-1443 24-144 24-1443 24-1443 24-1443 24-1443 24-1443 24-1444 24-1444 
oS -s516 22-2058 55-5898 56-5 57-5902 57-5902 57-5902 57-5902 63-5914 
$STUP = 177777 #19-1425 = #19-1425 19-1425 -#19=1425 19-1425 19-1425 = #19=1425 = -#19-1425 19-1425 
#19-1425 = #19-1425 19-1425 = #19=1425 = #19-1425 19-1425 19-1425 = #19=1425 19-1425 
SSVLAD 036430 56-5 #56-5900 
$svPC = 003602 #22-1438 22-1438 
SSWR = 177400 19-1409 #19-1409 = #19-1411 20-1427 20-1427 20-1427 24-1443 24-1443 24-1443 
24-1443 24-1443 25-1464 26-1575 27-1620 28-1824 1 30-1962 31-2334 
32-2513 33-2809 34-2987 35-3092 36-3250 37-3349 38-3446 39-3546 40-364 
41-3789 42-3930 43-4051 44-4199 45-4411 46-4553 47-4703 48-4799 49-4879 
50-5055 51-5313 52-5525 53-5749 54-5833 55-5898 55-5898 55-5898 55-5898 
55-5898 56-5900 56-5 56-5900 56-5900 56-5900 56-5900 56-5900 5900 
56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 
56-5900 56-5900 56-5900 57-5902 57-5902 57-5902 57-5902 57-5902 7-5902 
57-5902 57-5902 57-5902 57-5902 57-5902 65-5920 
SSWREG 001340 #20-1427 24-1443 
SSWRMK = 000000 yah as 56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 56-5900 
SSWRMS = 000200 #19-1412 
STAB 042272 66-603 #71-6127 75-6794 .: 75-6794 75-6796 75-6796 5-6 75-6797 75-6797 
75-679 75-6800 75-6802 ‘ 75-68 75-6809 75-6810 75-6811 75-6814 75-6814 
75-6816 75-6816 75-6817 75-6838 75-6820 5-6820 75-6821 75-6822 75-6822 
5-6823 75-6825 75-6825 75-6826 75-6827 75-68 75-6829 75-6832 75-6832 
75-6835 75-6835 75-6839 75-6839 5-6842 75-6842 75-6850 75-6850 75-6851 
75-6852 75-6852 75-6856 75-6858 75-6858 75-6865 5-6868 5-6868 5-6871 
75-6871 75-6875 75-6882 5-688 75-6887 75-68 75-6890 75-6905 75-6916 
75-6916 75-6923 75-6926 75-693 75-6932 75-6945 75-6974 75-6974 75+6975 
STBIT 036162 *24-1443 55-5898 55-5898 55-5898  #55-5898  +*65-5920 
STERM = 0000 #64-5918 
STESTN 001322 #20-1427 *56-5900 -6060 
STHE 2466 #71-6133 -68 75-681 
STIMES 1302 #20-1427 = 24-1443 = 55-5898 = *56-5900 56-5900  *56-5900 56-5900 56-5900 
$TKB 001146 eis H 23 a. 59-5 59-5906 59-5906 63-5914 63-5914 63-5914 63-5914 
$TKS 001144 #20-1427 5 59-5 59-5906 59-5906 63-5914 63-5914 63-5914 63-5914 
63-5914 63-5914 63-5914 
$TMPO 001232 #20-1427 *66-5931 *66-5932 75-6794 -6 75-679 75-6800 75-6802 75-6808 
75-6810 75-6814 75-6816 75-6818 75-6820 75-6822 75-6825 75-6827 75-6829 
75-6832 75-683 5-683 75-6842 75-6850 75-6852 75-6856 75-6858 75-6861 
75-6865 75-6868 75-6871 75-6875 75-6882 75-6887 75-6890 75-6905 75-6916 
75-6923 75-6926 75-6932 75-6945 75-6 75-6974 75-6975 














CKF PAC 


CREATED BY MACRO ON 28-MAR-81 AT 13:02 


CROSS REFERENCE 


VAL 
001234 


001300 
001240 


wr 


*52-5722 


*66-5933 


75-6864 
*30-2224 


*25-1506 
m ats 24 


*52-5723 


75-6794 


*27-1653 
*44-4261 


*27-1757 


*30-2255 


*25-1522 
9 


75-6802 


*25-1523 


*52-5724 


PAGE 46 
SEQUENCE 232 
CREF V 


01 
75-6796 


*27-1681 
#44-4279 


*27-1775 
*30-2261 


*25-1532 
*6o_s0n? 


*52-5725 


75-6797 


75-6806 


*27-1781 


*30-2291 


*25-1545 


75-6849 


*26-1605 


*52-5715 
*52-5726 


75-6808 
75-6807 


75-6853 


*25-1558 
*27-1713 


75-6916 


*27-1787 


*52-5727 


*30-2257 
75-6810 


75-6864 


*25-1563 


*52-5728 


75-6808 
1 
75-6916 


*30-2262 
75-6853 


75-6932 


*26-1595 


*52-5729 


75-6810 
75-6832 
75-6865 
75-6923 


*30-2293 
75-6863 


*27-1628 


*53-5810 





CREATED BY MACRO ON 28-MAR-81 AT 13: oe PAGE 


CKF PAC 


QUENCE 233. 
SYMBOL CROSS REFERENCE CRE vo1 
SYMBOL VALUE REFERENCES 
*53-5813  *53-5814 *53-5815 = *53=5816 = *54-5879 = *54-5884 = *54-5886 += *67-6076 75-6794 
75-6796 75-6797 75-680 75-6809 75-6811 75-6814 75-6816 75-6820 75-6822 
75-6825 75-6827 75-6829 75-6832 75-6835 75-6839 75-6842 75-6850 75-6852 
75-6857 75-6859 75-6861 75-6865 75-6868 75-6877 75-6873 75-6874 75-6882 
75-6890 75-6916 75-6923 75-6926 75-6974 
STMP4 001242 #20-1427 = #25-1508 += * 26-16 *26-1606  *27-1788 27-1795 +*28-1866 *28-1880 +*29-192 
*29-1932  +*30-2076 *30-2082  *30-210 *30=2118  *30-2143 *30-2212 39*30-2220 §3=—* 31-2452 
#31-2659  *31-2480 * 32-2624 —*32-2630 §=—- 32-2649 9 #33-2885 = * 33-2900 §9= * 35-3180 §=— * 335-3. 186 
*36-329 *36-33 #36-3315 # 37-3396 «= #37=3404 9 # 37-3413 «= * 38-3495 = * 38-3502 = * 38-3514 
#39-3593 #39-3598 —-#39-3610 —-* 39- 3619 = *40-3750 §=— 40-3758 §=— 41-3878 = 41-3891 = #4 11-3899 
#42-4008 42-4015 843-4140 = #43=4157 944-4336 244-4351 44-4 #45-4436  *45-4464 
645-6492 45-4522 #454530 #464651 946-4656 9 846-4666 = 846-4671 847-4745 847-4753 
#47-4761 48-4833 +*48-4841 #49=5005  *49-5013 *49-5019 49-5025 49-5031 
*50-5227  *50=5231 -*50-5237 = *50-5243 = *50-5252 = #50-5258 = *50-5264 9=— 50-5274 §=— *5.1-5460 
#51=-5465 9 #51-5470 = #51-5476 = 51-5479 = *51-5485 —*51-5491 = *51-5494 = *5.1-55 *51-5503 
852-5714 52-5718 = 52-5719 52-5720 9 *52-5721 = #52-5722 «= *52-5723 = #52-5724 «= #525725 
#52=5726 *52=5727 = *52=5728 «= 52-5729) #535809 = 53-5815 = 53-5814 «= *55-5815 = *5 35-5816 
*54-5880 *54-5884 54-58 *6.°-607 75-6795 75-6798 75-6801 75-6809 5-6811 
75-6817 75-6821 75-6823 5-682 75-6827 75-6828 75-68 75-6833 75-6836 
75-6840 75-6841 75-6841 75-6851 75-6857 75-6860 75-6862 75 75-6869 
75-6872 75-6883 75-68 75-6916 75-6924 75-6927 
STMPS 001244 #20-1427 = 25-1509 = *27-1622 = *28-1834 9 *30-2077 = 30-2084 = *30-21 *30-2144 +*30-2158 
*30-217 *30-2189 +*30-22 #30=2213 930-2229 = *30-2265 = #31-2460 39 *31-2465 = * 31-2471 
*32-2631 *32-263 #33-2811 *33-2812 «33-2813 9 *33-2814 9 *33-2815 9 #332816 §=— *33-2817 
*33-2818  *33-2819 33-2820 33-2821 *33-2822 9 *40-3731 9 *40-3737 = #41-38 *42-3995 
#42-4021 9843-4127 = #43-414 #446326 = #44-4341 = 45-4532 «= 46-4652 = #464657 = #474746 
#47=4754 48-4834 49-5001 %49-5007 *49-5015 = *49-5021 9 *49-5026 §9=— *49-5032 = #505238 
#50-5244 50-5253 50-5259 50-5265 *50-5273 9 *51-5473 = *51-5482 = #515488 = *51-5497 
#52=5718 852-5719 «= 52-5720 «= 52-5721 = #52-5722 «852-5723 = 52-5724 = #525725 = #525726 
*52-5727 *52-5728 = *52-57. *53-581 *53-5814 +*53-5815 53-5816 *54-5884  +*54-5886 
75-6795 75-6806 75-6807 75-681 75-6828 75-682 5-683 75-6831 75-6833 
75-6840 75-6841 75-6843 75 75-6853 75-6854 75-6856 75-6858 75 
75 75-6887 75-6888 75-6917 75-6918 75-6924 75-6927 
STMP6 001246 #20-1427 *27-1752, #27-1758 = *27-1776 = *27-1782 = #302078 §=— 30-2089 * *30-2125 
*30-21 #30-2145 *30-2159 *30-2174 30-21 #30-2205  *30-2214 *30-2238  *30-2248 
*30-2256 +*30-2275 *30-228 *30-2292 31-2466 31-2472 32-2636 32-2641 +*335-2898 
#40-3733 40-37 #40-3742  *40-3744 40-3746 *41-3873 9 #41-3877 = #41-3883 = *41-3885 
*41- #42=3972 42-3976 —#42-3980 9 #42-3984 «= #42-3988 = *42-3993 = *42-4023 = #434106 
43-4110 843-4116 843-4118 843-4125 843-4146 843-4146 244-4334 244-4549 #45~45351 
#46-4658 = *47-4747 = #47-4755 = #48-4835 9 *49-4998 = #495 #49-5010 *49-5012 +*49-5018 
#49-5027 49-5033 *50-5236 50-5242 = *50-5248 39 *50-5251 = *50-5257 §9— *50-5265 = *50-526 
*50-5272 *50-5278 *50-5281 5284 50-5287 3951-5471 = *51-5477 = #51-54 *51-5486 
#51-549 #51-5495 #51-5501 = #51-5504 «= #52-5718 }3=— *52-5719 = #52-5720 = *52-5721 = 852-5722 
*52-572 852-5724 #52=5725 3 #52=5726 «= *52-5727 «= #52=5728 = *52-5729 = *55-5813 — *55-5814 
#53-5815 *53-5816 54-5884 +*54-5886 75-6807 5-682 -68 75 
75-685 ~6859 75-686 75-6888 75-6917 75-6928 
STMP7 001250 #20-1427 = *27-1623 = *27-165 *27-1680 27-1709 +*30-2085 *33-51¢) *30-21 *30-2175 
#30-2191  *30-2206 *30-2228 30-2266 *31-2467 = # 31-2473 = #322657 = * 52-264 #40-373 
*40-3738 41-3872 +*41-3879 * wey #424022 #4 3=4128 = #43-4149 9844-4328 9 844-434 
75 75-6831 ~6833 75-6844 5-685 5 3 75 75-691 
$TN 000037 19-1409 #19-1409 24-1464 25-1464 425-1464 25-1575 26-1575 = #261575 26-1620 
27-1620 #27-1620 27-1824 28-1824 #28-1824 28-1904 1 #29-1904 29-1962 




















CKFPAC 


SYMBOL 
SYMBOL 


CREATED BY 
CROSS REFERENCE 
VALUE 


REFERENCES 
30-1962 #3 


196 0-1962 
33-2809 #33-2809 
36-3250 #36-3250 
39-3546 439-3546 
42-3930 #42-3930 
45-4411 45-4411 

8-4 #48-4799 
51-5313 -#51-5313 
54-5833 #54-5835 

#20-1427 59-59 
#20-1427 59-5906 
#20-1427 59-5 
24-1443 9 #64-591 
#64-5916 64-5916 
#64-5916 64-5916 
64-5916 #64-591 
64-5916 64-5916 
64-5916 64-591 
64-5916 64-5916 
#64-5916 64-5916 
64-5917 #64-5917 
64-591 #64-5916 
#23-1440 
#20-1427 *55-5898 

57-5 57-5902 

64-5916 

#61-5910 64-5916 

#59-5906 62-5912 
59-5 59-5906 
59-5906 5 

#60-5908 64-5916 
60-5908  #60-5908 
0-5 64-591 

#20-1427 

#23-1440 

#20-1427 

#20-1427 

#20-1427 

59-5 59-5906 

59-5906 59-5906 
#56-5900 
#55-5898 #55-5898 
*60-590 *60-5908 

56-5 57-590 
64-5917 #70-6109 
62-5912 62-591 


#23-1440 


2 
23-1440 


MACRO ON 28-MAR=81 AT 13:02 


PAGE _48 
SEQUENCE 234 
CREF vO01 

30-2334 31-2334 
33-2987 34-2987 
36-3349 37-3349 
39-3649 40-364 
42-4051 43-4051 
45-4553 46-4553 
48-4879 49-4879 
51-5525 52-5525 
54-5896 

59-5906 59-5906 
59-5906 59-5906 
59-5906 59-5906 
64-5916 64-5916 
64-5916 64-5916 
#64-5916 64-5916 
64-5916  #64-5916 
64-5916 64-5916 
64-5916 64-5916 
64-5918 

56-5900 56-5900 
57-5902 66-5931 
64-5916 

64-5916 64-5916 
59-5906 #59-5906 
59-5906 #59-5 
64-5916 

64-5916 

59-5906 63-5914 
55-5898 

60-5908  #60-5908 


431-2334 


52-5525 


64-5916 
64-5916 
64-5916 
64-5916 
#64-5916 
64-5916 


*56-5900 


63-5914 


31-2513 
34-3092 


52-5749 


#64-5916 


64-5916 


#64-5916 


56-5900 


32-2513 
2 


64-5916 
64-5917 


56-5900 


#32-2513 


#53-5749 


64-5916 


64-5917 


56-5900 


50-5313 
53-5833 


64-5916 
64-5916 
64-5916 
#64-5916 
64-5916 
64-5917 


56-5900 


eS Se 
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SEQUENCE 23 
MACRO CROSS REFERENCE CREF  vO01 
MACRO NAME REFERENCES R 
ACCMAC #19-895 #332811 «33-2812 33-2813 «#332814 «33-2815 9 #33-2816 «= 433-2817 9-33-2818 = # 33-2819 
#33-2820 #33-2821 «9 # 33-2822 
AMAC1 #72-6262 #72-6266 72-6 267 
ASMAC1 #19-852 55-5718 52-5719 52-5720 52-5721 52-5722 = 52-5723 = 52-5724 = 52-5725 = 52-5726 
eal gee? 55-5728 52-5729 53-5813 53-5814 53-5815 53-5816 54-5884 54-5886 
AS} #72-6392 «-72=6432 «72-6433 «= 72-6434 «= 72-6435 = 72-6440 «= 72-6441 72-6444 = 72-6447 
AS10 #726422 72-6460 72-6462 «= 72-6463 72-6464 = 72-6465 = 72-6466 
AS11 #72~6628 #72=6467 472-6469 #72~6470 72-6471 #726472 = #726473 = #726482 
AS2 #72-6395 —-72=6449 = 72-6450 
AS3 #72-6401 #72-6451 = #72-6452 ss 
ASG #72~6407 = 72-6453 72-6454 * 
ASS #726412  #72-6655 = #72-6456 = #72-6475 decal 
AS6 #72-6415  #72-6457 = #'72=6458 «= #726474 ‘. 
‘AS? #72-6418  #72-6459  #72-6461 
COMMEN #19-1415 
ENDCOM #19-1415 
ERMAC #19-834 57-5902 
ESCAPE #19-1415 
GETPRI #19-1415  #55-5898 
GETSWR 19-1415 24-1644 26-1444 
HMAC 1 #19-865 «-#34-3000 «= #343001 + # 34-3002 434-3003 «= # 34-3004 
HMAC2 #19-875 «#343025 34-3026 «0 # 34-3027 «= #34-3028 «39, # 34-3029 
HMAC 3 #19-881 34-3010 34-3011 34-3012 34-3013 34-301 
1TEMAC #19-B47 #21-1434. 21-1434. #21-1434 21-1434 421-1434 21-1434 21-1434 21-1434 21-1434 


#21-1434 27-1434 21-1634 21-1434 21-1434 21-1434 21-1434 = 21-1434 21-1434 21-1434 


#21-1634 21-1634 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 #211434 21-1434 
#21-1636 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 21-1434 = #2 1-1434 


#21-1434 

LDM1 #72-6308 #72-6329 #72-6334 

LDM2 #72-6314 72-6330 72-6335 72-6339 72-6343 
LDM3 #72-6318  #72-6331 #72-6336 #72-6341 = #726345 
LDM4 #72-6322 «= 72-6332 «= 472-6337 = #726340 )=—- #726344 
LDMS #72-6326 72-6333 72-6338 72-6342 72-6346 
LDM6 #72-6347 72-6362 72-6364 

LDM7 #72-6351 #72-6368 #72-6369 

LDM8 72-6355 #72-637 #72-6376 

LDM9 #72-6359 72-6390 72-6391 

LD1M1 #72-6271 72-6275 72-6288 72-6291 

LDIM2 #72-6279 72-6289 72-6292 72-6294 

LD1M3 #72-6285 72-6290 72-6293 72-6295 72-6307 


#19-810 




















CKF PAC 


LPERR 


MERROR 
MSG 


MULT 
NAMEP 
NEWTST 


NTMPM 
PCP 
PUSH 


REPORT 
ROMAC 
RSET 


RTMPM 
SETPRI 
SETTRA 


MACRO CROSS REFERENCE 
MACRO NAME REF 5 


#64-5916 


#52-5628 
25-1464 
2 


50-5055 
#24-1444 


444-4411 


#58-5904 
#58-5904 


#25-1567 
#35-3242 
#46-4694 
#67-6080 


64- 444] 
64-5917 

24-1443 
#19-1415 


20-1427 


CREATED BY MACRO ON 28-MAR-81 AT vo * = 


#26-1576 
5 


#52-5656 
#25-1570 


#50-5303 


#25-1575 
#35-3250 
#45-4553 


#61-5910 
#61-5910 


#26-1610 
#36-3340 
#47-4790 
#68-6089 


64-5916 


20-1427 


#24-1443 


PAGE 50 
QUENCE Os 
CRE v01 
#27-1621 #27-1638 
430-1964  #30-2006 
433-2815  #33-2816 
435-3125 = #36-3251 
45-4440 = #454468 
#49-4909 = #49-4945 
#51-5367 = #51-5390 
#52-5685 = #53-5751 
26-1575 #26-1612 
31-2334 #31-2507 
36-3250  #36-3342 
41-3789  #41-3924 
46-4553  #46-4696 
51-5313 -#51-5518 
#26-1620 #27-1824 
436-3349  #37-3446 
446-4703 #47-4799 
62-5912 #62-5912 
462-5912 #62-5912 
#27-1802 #28-1894 
#37-3437 #38-3536 
#48-4869  #49-5044 
#69-6098 
64-5916 64-5916 
20-1427 22-1438 
27-1620 28-1824 
32-2513 33-2809 
37-3349 37-3349 
42-3930 42-3930 
47-4703 47-4703 
52-5525 52-5525 
59-5906 60-5908 
66-5923 67-6068 


#27-1651 


#53-5780 


27-1620 
32-2513 
37-3349 
42-3930 
47-4703 
52-5525 


#28-1904 
#38-3546 
#48-4879 


#65-5920 
62-5912 


#29-1947 
#39-3640 
#50-5301 


64-5916 


23-1440 


68-6083 


54-5835 
#27-1805 


#52-5742 


#29-1962 
#39-3649 
#49~5055 


#65-5920 
#65-5920 


#30-2326 
#40-3780 
#51-5463 


64-5916 


tab hos, 


62-5912 
69-6092 


#27-1679 


#54-5857 
28-1824 


53-5749 


#30-2334 
#40-3789 
#50-5313 


#65-5920 
#31-2505 


#41-3922 
#51-5468 


64-5916 


23-1440 
93-1904 


70-6101 


#27-1695 


#52-5556 


#28-1897 


#53-5824 


#31-2513 
#41-3930 
#51-5525 


#32-2673 
442-4042 
451-5517 


64-5916 


63-5914 


#27-1708 


#52-5578 


29-1904 
34-2987 
39-3546 
44-4199 
49-4879 
54-5833 


#32-2809 
#42-4051 
#52-5749 


#33-2980 
#43-4181 
#52-5741 


64-5916 


63-5914 
















CKF PAC 


SSCMTM 


SSESCA 
SSNEWT 


S$$SET 
SSSETM 


RENCE 
REFER 


ao 


—_ 
oP ar ar er er er et ee A 
ron ea ee ew eS] 
N NUIT 


#24-1443 
#19=1415 


#19-1405 


ES 


55-5898 
24-1444 


63-5914 


#20-1427 


#20-1427 
#20-1427 


24-1464 
34-3092 
44-4411 


64-5916 
64-5917 
#24-1443 
#24-1443 


#19-1415 


19-1425 


22-1438 
#20-1427 
3 0 


CREATED BY MACRO ON 28-MAR-81 AT Ss 
MACRO CROSS REFE 
NAME 


55-5898 


#55-5898 
#20-1427 
#20-1427 


#20-1427 
#20-1427 


20-1427 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


26-1620 
36-3349 
46-4703 


64-5916 


PAGE 51 
SEQUENCE 237 
CREF 


v01 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


27-1824 
37-3446 
47-4799 


64-5916 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


28-1904 
38-3546 
48-4879 


64-5916 


#19- 
#19- 


—) = 
ee 
_—— 
wi 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


29-1962 
39-3649 
49-5055 


64-5916 


#19-1 
#19-1 


“se 
WMV 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


30-2334 
40-3789 
50-5313 


64-5916 


#19- 
#19- 


~~ 
~ 
-—— 
ww 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


31-2513 
41-3930 
51-5525 


64-5916 


#19- 
#19- 


—_—— 
ar 
ab ad 
ui“ 


#20-1427 
#20-1427 


#20-1427 
#20-1427 


32-2809 
42-4051 
52-5749 


64-5916 


#19-1415 
#19-1415 


